[Resolvido]Relatório c/ Filtro - Só Imprimir o filtrado

boas

Relatório c/ Filtro - Só Imprimir o Filtrado

tenho o seguinte código para "tentar" Pré-Visualizar o que se encontra filtrado na listbox

| DoCmd.OpenReport "Registo_Analises_Clinicas", acViewPreview, , "[ID] = " & Me.dtfinal |

No entanto aparece o relatório mas sem nada a visualizar ?

Obrigado

Pelo que vi o campo ID deve ser tipo número o campo dtfinal tipo data, talvez seja esse o problema ele não consegue fazer o critério como número com campo data

"[ID] = " & Me.dtfinal

Não podemos esquecer tambem que quando tratamos com data pelo VBA ela deve ser informada entre ## alem da formatação correta para evitar erros no processamento, ex:

# " & Format([txtMinhaData], "mm/dd/yyyy") & " #

Obrigado ao 2... Nomeadamente Gilberlanio e Fábio... No entanto mesmo que mude para campo Data, ou seja
"[Data] = " & Me.dtinicial
Acontece o mesmo...

Obs. aproveito para agradecer/ valorizando o seu site ( vídeos ) amigo Gilberlanio http://gilberlaniorocha.loja2.com.br/

Tente assim...

DoCmd.OpenReport "Registo_Analises_Clinicas", acViewPreview, , "[Data] =# " & Format(Me.dtinicial, "mm/dd/yyyy") & " #"


Se não der poste o seu BD

Uma vez mais Obrigado Fábio... Olhe ai um extrato (parte) do bd...
https://www.dropbox.com/s/n5fhluzuhiskrdr/bd_filtroLISTBOX1.accdb?dl=0
Obrigado

Meu amigo, vc não executou esse relatório sem filtro para testar ne? rerererere

Então execute ele direto, sem aplicar nenhum filtro, que verá que o mesmo nao exibirá nenhum VALOR, isso porque o relacionamento entre as tabelas está errado. Mude para o descrito na imagem a baixo, e deixe o Comando do Botão como esta, de acordo com a instrução da mensagem anterior. Faça um teste com o dia 01/06/2016.


Comando do Botão abrir relatorio:
DoCmd.OpenReport "Registo_Analises_Clinicas", acViewPreview, , "[Data] =# " & Format(Me.dtinicial, "mm/dd/yyyy") & " #"

Adeque o Relacionamento para:

Grande Fábio você até pode ter razão - Não duvido... mas no bd Original estava a trabalhar filtrava e aparecia valores - ( No entanto mudei porque realmente você tinha razão no relacionamento ) mas após fazer a alteração mantem o mesmo após clicar no botão não aparece nada no relatório.
Obrigado

Veja que funciona normalmente em seu BD teste... Veja no seu Original, se tem algum relacionamento a mais que esta impedindo a exibição!

https://www.dropbox.com/s/q1ff52s61abcua8/Banco_Pesquisa.zip?dl=0

Fábio... Ups ! você se enganou no bd que me enviou . . . era um seu de teste... ora veja !!! ?

https://drive.google.com/open?id=0BwPmgbAs0bSVbkFtNDZKdzV0UDQ
Esse é o verdadeiro!

Certo... irei ver, mas porque não funciona com outras Datas ?
Obrigado

Aqui funcionou com todas... Observe que estamos utilizando o = entao so trara registros q forem iguais a o campo dtinicial.

O que pretende nao e Entre dtinicial e dtfinal? Se for altere o filtro para:

DoCmd.OpenReport "Registo_Analises_Clinicas", acViewPreview, , "[Data]  Between # " & Format(Me.dtinicial, "mm/dd/yyyy") & " # AND # " & Format(Me.dtfinal, "mm/dd/yyyy") & " #"  


' Assim exibira o mesmo que mostra no formulario...

Amigão... Sem palavras a serio muito obrigado pela ajuda valeu mesmo. Grande abraço Fábio ( Hoje aprendi algo mais ) muito obrigado.

Bacana, ate a proxima se Deus quiser!!!