Grafik einfügen in Word 8

Computer: Software & Programmierung Office Software
1

Hallo,

ich möchte gerne in Word automatisch jede Grafik, die ich aus der Zwischenablage einfüge, mit der der Option „Uber den Text legen“ ausgeschaltet einfügen, damit ich nicht fast jede eingefügte Grafik nachbearbeiten muss.
Dabei möchte ich beim einfügen nicht über „Inhalte einfügen“ gehen.
Ich hab’s schon mit 'nem Makro versucht, aber beim Aufzeichnen ist das Kästchen immer gegraut.

Hat jemand eine Ahnung?

2

Hallo Peter,

also das Umwandeln per Makro geht ganz einfach. Allerdings muß man das selbst programmieren:

Sub Nicht\_ueber\_den\_Text\_legen()
' Makro aufgezeichnet am 01.08.00 von Kristian Zarse
'
 Selection.ShapeRange.ConvertToInlineShape
End Sub


Sub Ueber\_den\_Text\_legen()
' Makro aufgezeichnet am 01.08.00 von Kristian Zarse
'
 Selection.InlineShapes(1).ConvertToShape
End Sub

Es sind nämlich unterschiedliche Objekttypen, wie Du siehst.

Warum willst Du eigentlich nicht „Inhalte einfügen“ verwenden? Das geht doch ebenso gut:

Sub Inhalte\_einfuegen()
' Makro aufgezeichnet am 01.08.00 von Kristian Zarse
'
 Selection.PasteSpecial Link:=False, DataType:=wdPasteMetafilePicture, \_
 Placement:=wdInLine, DisplayAsIcon:=False
End Sub

Achso, guck mal in die VBA-Hilfe unter „ConvertToInlineShape“. Da steht das alles drin.

Viele Grüße.

Kristian

PS: Achso, falls Du es nicht weißt: Gehe einfach auf „Makros… Erstellen“, um ein eigenes Makro zu schreiben. Wenn Du mit dem Cursor auf „ConvertToInlineShape“ gehst und Strg-F1 drückst, kommt die Hilfe, sofern Du sie installiert hast.

3

Danke,

geht tatsächlich ganz einfach.