[Resolvido]Relatório com datas e destino

boas malta rija
estou criando uma BD de registo de correspondência.
tenho necessidade de criar um relatório com:
- data inicial
- data final
- destino
para ser impresso
dos vários exemplos que encontrei por aqui, e sao muitos , não encontrei o que pretendia por isso peço a vossa ajuda
o que é mais parecido ao que pretendo é o " gerar pdf" mas falta lá o destino, por isso peço a vossa ajuda
em facultar o codigo para o que pretendo
aguardo apoio

mirsofy

Não entendi muito bem. Você precisa que os dados sejam filtrados por "data inicial", "data final" e "destino"? Se for isso, pode utilizar algo assim, em um formulário contendo os campos para inserir esses dados:

Código:

DoCmd.OpenReport "NomeDoRelatório", acPreview, , "NomeCampoDataNaTabela>=#" & Format(Me.DataInicial, "mm/dd/yyyy") & "# And NomeCampoDataNaTabela<=#" & Format(Me.DataFinal, "mm/dd/yyyy") & "# And NomeCampoDestinoNaTabela LIKE '*" & Me.Destino & "*'"

Veja se é isso mesmo ou se estou viajando.

boas amigo
vou testar,é exactamente isso que quero
já retorno

mirsofy

não estou a conseguir, ou não percebi a tua ideia, envio a bd se puderes dar uma vista de olhos agradeço

mirsofy

http://dl.dropbox.com/u/58104242/correio.zip

Tente o seguinte: primeiro, troque o nome da caixa de combinação do formulário para cboDestino. Agora, no botão que acione o relatório, coloque apenas:

Código:

DoCmd.OpenReport "Secção", acPreview

Agora, no evento "Ao abrir" do relatório, coloque:

Código:

Me.RecordSource = "SELECT * FROM tbl_Entradas WHERE DataRegisto>=#" & Format(Forms!frmRelatorio!DataInicial, "mm/dd/yyyy") & "# And DataRegisto<=#" & Format(Forms!frmRelatorio!DataFinal, "mm/dd/yyyy") & "# And Destino LIKE '*" & Forms!frmRelatorio!cboDestino.Column(1) & "*'"

5 estrelas
era mesmo isto que queria , grato pelo apoio

mirsofy