Selecionar todos os registros filtrados no formulário

Prezados amigos,

Sou novo no forum, e estou de uma ajuda para gerar um código VBA para selecionar todos os registros de um formulário filtrado.
alguem pode me ajudar???

Bom dia, Newton, e bem-vindo ao fórum
A sua dúvida é tão genérica que nem sei para o que pretende.
Tente descrever concisamente. Se não conseguir, disponibilize a bd e descreva o que pretende atingir

Alexandre, obrigado pela atenção

Tenho um formulário com 03 combos para selecionar dados de minha tabela principal.Ao preencher as combos clico em um botão que atualiza as informações do formulário que está no modo "varios ítens" e são carregadas as informações solicitadas pelas combos.
Vamos supor que ao atualizar as informações, foi retornado 10 linhas de informações.
No meu projeto eu preciso de marcar a linha desejada, informar a data de emissão e de vencimento em campo não acoplado e clicar em um botão que chamo de "fechar compra" e um numero é gerado e a compra é flegada como "fechada".

A ajuda que preciso é que neste caso se eu precisar fechar todas as compras, eu tenho que clicar na primeira linha e fechar depois na 2ª e fechar, depois na 3ª fechar ..... e assim por diante. Tem alguma forma de selecionar todas as linhas e em um click no botão "fechar compra" e o código é executado em todas as linhas selecionadas.

"fechar compra" é tão genérico.
Para obter os registos do formulário dentro dum recordset, utilize a propriedade recordsetclone

Tentarei ser mais objetivo e claro.

Tenho um formulário com 03 combos para selecionar dados de minha tabela principal.Ao preencher as combos clico em um botão que atualiza as informações do formulário que está no modo "varios ítens" e são carregadas as informações solicitadas pelas combos.

Em cada linha filtrada pelas combos tem um campo que chamo de "fechado".Tenho um botão que se chama "fecha compra", que ao clicar no mesmo executa o código abaixo:

private sub fecha_compra_click()

me.nrpedido = [tipo_de_compra] & [empresa] & [dt_leitura] & [vencimento]
me.fechado = true

end sub

Até ai tudo bem, mas quando tenho vários registros tenho que marcar a linha e clicar no botão "fecha compra" , marcar a segunda linha e clicar no botão "fecha compra" e assim por diante.

Gostaria de saber se vc pode me ajudar a criar um código do tipo "marcar tudo" e ao clicar no botão "fecha compra" o código pretendido será executado em todos os registros selecionados.

Espero ter sido mais claro agora. De qualquer forma obrigado pela atenção!

Boa noite,
Se disponibilizar a bd para experimentar soluções

Alexandre/Criquio

Muito obrigado pela atenção, fiquei muito envolvido no projeto que me esqueci de agradecer pela boa vontade em ajudar. Após  estudar mais percebi que bastava eu colocar o código Me.Form.Recordset.MoveNext  para ele mover o cursor para o próximo registro, e caso eu queira executar o comando clico no botão "fechar compra".


           me.nrpedido = [tipo de compra] & [empresa] & [dt leitura] & [vencimento]
           me.fechado = true

           On Error Resume Next
           Me.Form.Recordset.MoveNext

Bom dia,
Lembre-se dar o tema por "Resolvido"
Dê retorno no outro tema aberto (http://maximoaccess.forumeiros.com/t11853-executar-um-codigo-para-varios-registros-filtrados-no-formulario#92731)