Reportar Dados Formulário para Relatório

Boa tarde Amigos !

Tenho uma duvida, estou utilizando a seguinte estrutura para reportar os dados de uma formulário de pesquisa para um relatório.

Coloquei esse codigo em uma "botão" dentro do formulário, mas quando clico ele me abre o relatório em branco.

DoCmd.OpenReport "Pesquisa", acPreview
Report_Pesquisa.Filter = ""
Report_Pesquisa.FilterOn = True


O que pode estar faltando ?

Boa tarde amigão, teste assim para vermos:

DoCmd.OpenReport "Pesquisa", acPreview
Report_Pesquisa.Filter = Me.Filter
Report_Pesquisa.FilterOn = True

E ai Fernando, td bem ? Espero que sim !

Amigo, tentei dessa forma:

Private Sub CmdRelatorio_Click()
DoCmd.OpenReport "Pesquisa", acPreview
Report_Pesquisa.Filter = Me.Filter
Report_Pesquisa.FilterOn = True

End Sub

Mas retornou erro de compilação "Variável não definida!"

Tudo bem e você como esta?

Poderia anexar seu banco para entendermos melhor?

Fernando, bom dia !

Segue db em anexo.

Obs.: É o formulario pesquisa + botão relatório.


Abraço e obrigado !

Bom dia vinicius, seu relatorio não possui nenhuma caixa de texto nem fonte do controle?

Precisa montar o relatório para depois poder fazer o filtro na listbox.

Bom dia Fernando !

Fiz as alterações conforme você indicou, porém agora ele esta me retornando um erro ( Uso do "Null" invalido ).

Bom dia Vinicius, hoje meu dia esta muito corrido não vou ter tempo para mexer em seu bd,

deixo em anexo um exemplo que fiz para um membro aqui do forum, tente adapta-lo em

seu projeto.

Fernando, bom dia !

Obrigado pelo arquivo e me desculpe por ocupar seu tempo, imagino q vc deva estar na correria mesmo!

Infelizmente não consegui evoluir muito, vou pensar em outra forma de gerar o relatório pois desse jeito esta difícil de acertar.

Novamente obrigado pela ajuda.

Abraço.

Boa tarde amigão, é realmente to na correria esses dias mais não tem problema sempre que sobra

um tempinho to por aqui.

Ta certo, tente usar a base do bd exemplo e qualquer duvida veremos a melhor forma de

ajuda-lo ok.