Hallo,
ich würde gerne ein Makro in Word schreiben, welches mir ein Fenster zu einem beliebigen Ordner öffnet, in dem sich Bilddateien befinden. Dann möchte ich mit der Maus verschiedene Bilder auswählen und diese sollen dann in eine Word-Tabelle automatisch eingefügt werden.
Ich hatte es schon mit folgendem versucht, aber es funktioniert immer nur bei einem Bild.
With Dialogs(wdDialogInsertPicture)
'Dialog zur Auswahl der Grafikdatei anzeigen
If .Display = -1 Then
'gewählten Dateinamen merken
'strDateiname = .Name
'an Cursorposition in Dokument einfügen
Selection.InlineShapes.AddPicture FileName:=strDateiname, LinkToFile:=False, SaveWithDocument:=True
Bitte um schnelle Hilfe. Vielen Dank. |