Inhalte verknüpfen statt einbetten

[koter]

Hallo André,

ein Schuss ins Blaue:

Vielleicht ist die Funktion mit VBA aufrufbar (falls Deine Version VBA hat)

Code:

Sub impExtern()
   Dim impopt As StructImportOptions
   Dim impflt As ImportFilter
   Dim datei As String
   
   datei = "C:\temp\Unbenannt-1.jpg"
   
   Set impopt = CreateStructImportOptions
   With impopt
       .Mode = cdrImportFull
       .LinkBitmapExternally = True
   End With
   Set impflt = ActiveLayer.ImportEx(datei, , impopt)
   impflt.Finish
End Sub

Du musst die Variable „datei“ anpassen oder eine gleichnamige Datei erstellen.

Gruß

Koter