[Resolvido]Código no botão para filtrar por datas.

Bom dia amigos e colegas do fórum.

Tenho uma duvida, simples para alguns...e complicada para mim.

Tenho uma tabela pagamentos, dela gerei uma consulta ( filtrada por data), dessa consulta gerei um relatório, que é filtrado por data de pagamento.

Não quero utlizar macros pois deixam o sistema mais lento.

Como eu posso inserir um código em VBA nesse botão, para chamar o relatório, sendo que o mesmo é filtrado por data ? Via macro eu sei que ele chama....mas em código, sinceramente eu não sei.

Eu estou estudando um código aqui:

Private Sub Imagem3_Click()
On Error Resume Next
Dim strDocName As String Dim strFilter As String
strDocName = "pagamentos"
strFilter = "ID= Forms!pagamentos!ID"
DoCmd.OpenReport strDocName, acViewNormal, , strFilter
DoCmd.Close acForm, "movimento financeiro"

End Sub

Sei que o caminho é esse...mas onde eu coloco o campo do filtro por data ? Pois o filtro ali na linha acima ( strfiltrer) está filtrando por Id.

Alguém pode me dar uma luz ?

Olá Silvio

Você só tem que ter um botão de comando e no evento clicK colocar o código acima. Simples.

Vieira bom dia a si.

Mato a pau, apenas deixei como comentário no código a linha strFilter = "ID= Forms!pagamentos!ID" e ele me mostrou a caixa para selecionar a data de inicio e a data do fim.

Grato Vieira !

Bom trabalho Silvio

Grato Sérgio.