[Resolvido]Exportar relatório dá erro - campo data não válido

Boas caríssimos mestres
Venho solicitar ajuda na questão do código em VB que segue em baixo por causa do campo "data da despesa que dá sempre erro ao exportar o relatório para a pasta do computador.
o normal seria dizer que EXEMPLO: MERCADONA datada de 21 de agosto de 2024 no nome do ficheiro pdf.

Código:


Private Sub Tipo_de_despesa_DblClick(Cancel As Integer)
Dim SeuRelatorio As String
   Dim SeuCaminhoEficheiro As String
   
   SeuRelatorio = "Custo do artigo - Reports"
   SeuCaminhoEficheiro = "C:\Users\srh60867\GESJMGomes\faturas\"
      DoCmd.OpenReport SeuRelatorio, acViewReport, , "[ID]=" & [ID]
       DoCmd.OutputTo acOutputReport, SeuRelatorio, acFormatPDF, SeuCaminhoEficheiro & Tipo_de_despesa & " datada de  " & Data_da_despesa & ".pdf", False, "", 0
   DoCmd.Close acReport, SeuRelatorio, acSaveNo

End Sub

Aguardo a vossa ajuda, Obrigado

Boas....

coloque como data abreviada em vez de data completa no campo origem da tabela.

deixe algo parecido conforme abaixo
" & Format(Me.DataReceita, "dd-mm-yyyy") & ".pdf"

Boas tardes. a expressão " & Format(Me.DataReceita, "dd-mm-yyyy") & ".pdf" coloco onde?

Caríssimos já descobri. Como é óbvio a expressão é para substituir na expressão antiga que tinha. Funciona na perfeição
Grande abraço
Resolvido

Olá a todos,

José Gomes, faltou dar o tópico como Resolvido, desta vez eu dou, no entanto veja como é efetuado:
https://www.maximoaccess.com/t860-resolucao-de-topicos

Abraço e bons estudos