Supportnet / Forum / Textverarbeitung
Serienbriefe email, individueller Betreff
Frage
Ich habe einen Serienbrief, der sich die Werte zu den Feldern aus einer Access Datei zieht. Der Serienbrief soll via Makro automatisch an alle Empfänger geleitet werden. Das einzige Problem bei der Sache ist, dass die Betreff Zeile bei jeder email anders seien muss. Sie muss den Wert des Seriendruckfeldes "Plan_Nr" enthalten. Bis jetzt sieht das Makro so aus.
Sub automatic_af()
With ActiveDocument.MailMerge
.Destination = wdSendToEmail
.MailAsAttachment = True
.MailAddressFieldName = "email"
.SuppressBlankLines = True
.MailSubject = ActiveDocument.MailMerge.DataSource.DataFields("Plan_Nr").Value
With .DataSource
.FirstRecord = wdDefaultFirstRecord
.LastRecord = wdDefaultLastRecord
End With
.Execute Pause:=True
End With
End Sub
Das einzige problem ist, das für jede ausgehende email die Plan_Nr des ersten Briefes vergeben wird....er macht dann also nicht weiter mit der nächsten sondern vergibt hintereinander weg jeder email den gleichen Betreff...
Hoffe es weiß jemand Rat.
MfG
Christoph
Antwort 1 von Adik
Ey man was solln das....muss doch jemand wissen!!
Antwort 2 von poorfirele
ey man ey nö...
aber müssen die daten wirklich direkt aus der access-datei gelesen werden?
es geht mit einem individuellen betreff wenn du quelldatei in excel vorliegt.
vielleicht kommt dieser umweg ja für dich in betracht.
aber müssen die daten wirklich direkt aus der access-datei gelesen werden?
es geht mit einem individuellen betreff wenn du quelldatei in excel vorliegt.
vielleicht kommt dieser umweg ja für dich in betracht.