Dim file As String
file = ActiveDocument.Path & "\" & Selection.Text
Selection.Range.InsertFile FileName:=file, Range:="",
debug.print file
ConfirmConversions:=False, Link:=False, Attachment:=False
Hier sagt VB bei der Ausführung: Datei kann nicht gefunden werden
wogegen der Code funktioniert:
Dim file As String
file = "C:\meinPfad\meineDatei.docx"
debug.print file
Selection.Range.InsertFile FileName:=file, Range:="", ConfirmConversions:=False, Link:=False, Attachment:=False