Eine Familie von Microsoft-Softwareprodukten für die Textverarbeitung zum Erstellen von Web-, E-Mail- und Druckdokumenten.
ein Workaround ist hier beschrieben:
"how to use a relative path to a data source for word mail merging (word 2007, word 2010)"
http://devblog.alexsapps.com/2011/08/how-to-use-relative-path-to-data-source.html
Viele Grüße
Lisa [MS MVP Word]
Danke Lisa,
... aber das ist dann doch recht heftig. Mit einem externen Programm in ein Word-Dokument einsteigen, um dort einen internen Verweis zu manipulieren ...
Ich hab da jetzt 'ne andere Lösung:
'======================================================
Sub Document_Open()
Dim PFAD, QUELLE As String
Dim POS, I As Integer
PFAD = ThisDocument.Path ' aktuelles Verzeichnis ermitteln
For I = 1 To 2 ' Zwei Verzeichnisebenen zurück
POS = InStrRev(PFAD, "")
PFAD = Left(PFAD, POS - 1) ' OHNE Backslash!
Next
QUELLE = PFAD & "\Adressen.xls" ' mit Backslash!
ActiveDocument.MailMerge.OpenDataSource Name:=QUELLE
End Sub
'======================================================
Bei mir liegt die Datenquelle zwei Ebenen über den Serienbrief. Bei Bedarf das I anpassen.