Relatório .pdf com filtro

Pessoal, boa tarde,

Estou precisando gerar um relatório com filtro em pdf no Access. Estou gerando o print preview, mas preciso gerar direto no arquivo .pdf.

Esse código eu abro o preview.

Código:



If Me!cb_AreaEntre <> "" Then

Equipamento = Me!cb_Equipamento

Dim dtinicio As Date
Dim dtfinal As Date
Dim strReport As String
Dim strWhere As String

dtinicio = Format(Me!DataINIArea, "MM/DD/YYYY")
dtfinal = Format(Me!DataFINArea, "MM/DD/YYYY")

Comum = "Auxiliares"

strWhere = "[Equipamento.DataJornada] between #" & dtinicio & "# AND  #" & dtfinal & "# AND( [Local.Area] = '" & cb_AreaEntre & "'or [Local.Area] = '" & Comum & "')"

strReport = "Equipamento_Insp"

DoCmd.OpenReport strReport, acViewPreview, , strWhere, acWindowNormal

Else

MsgBox "Você deve selecionar a área"

End If

Esse ouro eu já gero o PDF, mas não tem filtro nenhum..



Código:


DoCmd.OutputTo acOutputReport, "jornada_Atual", acFormatPDF, "Rel_Turno.pdf", True


Obrigado.

Pessoal, ninguém precisou desse tipo de situação?

Obrigado.

Para fazer esse output para PDF, terá de criar uma consulta que receba esses filtros, e dar a origem no seu relatório, essa mesma consulta.