Bem amigos este é um assunto um tanto quanto abordado no fórum, mas como é uma dúvida sempre recorrente postarei uma das soluções para que se consiga isto de uma forma mais eficaz creio eu.
Aplicando o filtro diretamente nos critério da consulta não estava me retornando corretamente:
>=[forms]![frmPrintBoleto]![DataInicial] E <=[forms]![frmPrintBoleto]![DataFinal]
Então em VBA, funcionando na perfeição:
DoCmd.OpenReport "Boleto", acViewPreview, , "cpDataVencimento >= #" & Me.DataInicial & "# And cpDataVencimento <= #" & Me.DataFinal & "#"
Cumprimentos.
Aplicando o filtro diretamente nos critério da consulta não estava me retornando corretamente:
>=[forms]![frmPrintBoleto]![DataInicial] E <=[forms]![frmPrintBoleto]![DataFinal]
Então em VBA, funcionando na perfeição:
DoCmd.OpenReport "Boleto", acViewPreview, , "cpDataVencimento >= #" & Me.DataInicial & "# And cpDataVencimento <= #" & Me.DataFinal & "#"
Cumprimentos.