Frage : Abbildungen/Fotos im Wort automatisch einsetzen

Ich habe eine Schablone, dass ich Fotos vom Aufstellungsort in einsetze und mich wunderte, wenn es eine Weise gibt, dies automatisch zu tun, indem man irgendeine Art der Verbindung? hinzufügt? jeder möglicher Rat apreciated!! Regards

Antwort : Abbildungen/Fotos im Wort automatisch einsetzen

Dieses ist ein Makro des Wortes VBA:
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:

VorInsertPictures ()
Schwaches strFolder als Schnur
Schwaches strFile als Schnur
Schwaches ilsh als InlineShape

strFolder = „C:\MyFolder“
strFile = Dir$ (strFolder u. „\ *.jpg“)
Bis strFile = tun ""
    Ilsh = ActiveDocument.InlineShapes.AddPicture einstellen (strFolder u. „\“ u. strFile, falsch, zutreffend, ActiveDocument.Bookmarks („\ EndOfDoc“). Strecke)
    strFle = Dir$ ()
Schleife
Enden-Unterseeboot
Weitere Lösungen  
 
programming4us programming4us