Relatorio access 2007

Meus amigos preciso de uma ajuda, tenho um sistema em Access 2007 e preciso converter todos os relatorios que estao no banco de dados em PDF em uma pasta idenpendente.Queria tipo criar um botão no form para fazer esse processo, alguem poderia me dar uma força nesse sentido?

Boas.....

Algo parecido com isso...


Private Sub bt_gerarPDF_Click()

Dim strarquivo As String
Dim strlocal As String

strarquivo = "Orçamento Nº " & Me!Idorcamento & " " & Me.Proprietario & ".pdf"
' nome do arquivo a ser salvo chave prima

strlocal = CurrentProject.PATH & "\Orcamento\" & strarquivo ' criar essa pasta onde está o banco de dados

'Abre o relatório devidamente filtrado e oculto
DoCmd.OpenReport "rptorcamento", acViewPreview, , "IDorcamento= " & Me!Idorcamento, acHidden
' nome do relatorio chave prima chave prima
'Gera arquivo pdf do relatório previamente aberto e filtrado.
DoCmd.OutputTo acOutputReport, "rptorcamento", acFormatPDF, strlocal

'Fecha o relatório
DoCmd.Close acReport, "rptorcamento"
End Sub

Boa tarde meus amigos.

Eu uso access 2007 SP1 e infelizmente as linhas de código para exportar o relatório em PDF não funcionaram, queria saber se existe uma outra forma de exportar?

Obrigado desde já!

Veja mensagem de numero dois do mestre Avelino...

Tem que ter o service pack 2 instalado para gerar o PDF.

Faça o Download do mesmo no site da Microsoft e instale ele.

Sucesso e abraços.