![]() |
||
![]() |
Grafiken aus der ZwischenablageIch 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:=wdInlineMit 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. |
![]() |