[Resolvido]Codigo VBA

Boa tarde

Tenho este código inserido num botão de comando, mas o que acontece é quando mando imprimir outro mapa ele não assume qual o mapa e a data, será que tenho que alterar alguma coisa no código? Alem deste Mapa "Registo no Recobro UCA", tambem é Registo no "Recobro UCA-Pernoita" , solicito a vossa ajuda.

Private Sub BtnImpRelPDF_Click()
Dim strArquivo As String
Dim strLocal As String
strArquivo = " Registo Recobro" & ".PDF"
strLocal = CurrentProject.Path & "\TESTE\" & strArquivo
DoCmd.OutputTo acOutputReport, "Rel_Registo_Recobro", acFormatPDF, strLocal
End Sub

O código postado sempre salva os arquivos com o mesmo nome. Gere nomes diferentes.

Código:

Private Sub BtnImpRelPDF_Click()
Dim strArquivo As String
Dim strLocal As String
strArquivo = " Registo Recobro" & second(now) & ".PDF"
strLocal = CurrentProject.Path & "\TESTE\" & strArquivo
DoCmd.OutputTo acOutputReport, "Rel_Registo_Recobro", acFormatPDF, strLocal
End Sub

Boa tarde

Valeu amigo pela dica, ficou beleza.

Um abraço

O fórum agradece o retorno. Sucesso.