Bericht als PDF via E-Mail senden mit Namen aus Feldern

[Cyberhunter]

Hallo zusammen,

ich hoffe das mir bei meinem Problem jemand helfen kann.
Ich habe einen Bericht den ich als PDF per Mail versenden will und dessen Name sich aus zwei Werten aus dem Bericht (variable) und einem festen Wert zusammen setzt.

Code [Auswählen] Erweitern

Me![AktuellesJahr] & "-" & Me![ID] & "_" & "Angebotsanfrage"

Leider weiss ich nicht wo und wie ich die Informationen eintragen muss, als Beschriftung funktioniert es nicht.
Wenn möglich als VBA Code.
Danke
Olaf

[MzKlMu]

Hallo,
was hast Du bisher als VBA (versucht) ?

[Cyberhunter]

Code [Auswählen] Erweitern

DoCmd.SendObject acSendReport , "rptOrder", acFormatPDF, , , , Me![AktuellesJahr] & "-" & Me![ID] & "_" & "Angebotsanfrage", , -1,

aber leider funktioniert es nicht

[el_gomero]

Moin Olaf,

die F1-Taste gibt oft hilfreiche Antworten - Cursor über SendObject setzen und F1 !!!

Daraus ergbit sich dann, dass deine Zeile nicht funktionieren kann.

Probier mal:

Code [Auswählen] Erweitern


Dim strSubject As String, strText As String, strEmpf As String, strCC As String


    strSubject = "Me![AktuellesJahr] & - & Me![ID] & _Angebotsanfrage"
    strText = "hier blabla zum Angebot"
    strEmpf = "jemand@aol.com"
    strCC = "cc@yahoo.com"
   
    DoCmd.SendObject acSendReport, "rptOrder", acFormatPDF, strEmpf, strCC, , strSubject, strText



Im übrigen kann keiner mit "leider funktioniert es nicht" was anfangen. Was funktioniert nicht? ggf Fehlermeldung angeben oder beschreiben was erwartet wurde und was passiert ist.