Grafiken aus der Zwischenablage

Ich bin vor kurzem auf Office 97 umgestiegen und habe nun ein Problem mit Grafiken in Winword 97. Im Gegensatz zur Version 7.0 fügt Winword 97 ein Bild aus der Zwischenablage standardmäßig als frei positionierbares Objekt ein, das auch den Text überlagern kann. Ich möchte meine Grafiken aus der Zwischenablage aber weiterhin fest im Text verankern. Wie kann ich erreichen, daß Winword die freie Positionierung der Grafiken automatisch ausschaltet?

Für das Einfügen von Grafiken aus der Zwischenablage ist in Winword 97 der Befehl Bearbeiten – Einfügen zuständig. Intern benutzt Winword dafür die Funktion EditPaste() und fügt die Grafiken deshalb als frei positionierbare Objekte ein, weil sich mit der Umstellung auf VBA die Standardeinstellung der Funktion EditPaste() geändert hat.
Wenn Sie die Grafiken aus der Zwischenablage nicht frei positionieren, sondern im Text verankern wollen, können Sie ein Makro definieren, das die neue Funktion ersetzt. Dazu rufen Sie den Befehl Extras – Makro – Makros auf, geben den Makronamen EditPaste ein und klicken auf die Schaltfläche Erstellen. Winword öffnet dann den VBA-Editor.
Da EditPaste() eine interne Winword-Funktion ist, finden Sie dort bereits die Standardfunktion für das Einfügen von Daten aus der Zwischenablage: Selection.Paste. Um die Grafiken im Text zu verankern, ändern Sie diesen Befehl wie folgt:

Selection.PasteSpecial Placement:=wdInline
Mit Hilfe des Parameters Placement können Sie die Plazierung der Grafik verändern. Dazu weisen Sie dem Parameter eine Konstante namens wdInline zu. Damit überschreiben Sie den Standardwert wdFloatOverText, so daß Winword die Grafik im Text verankert.