Charles hat ein Makro erstellt, um Lorem-Ipsum-Text in ein Dokument einzufügen. Er schaltete den Makrorecorder ein, tippte = lorem () ein und drückte dann die Eingabetaste. Dies fügte natürlich den Loreem-Ipsum-Text ein. Er platzierte eine Verknüpfung zum Makro auf dem Symbolleiste für den Schnellzugriff, aber das aufgezeichnete Makro funktioniert nur teilweise. Es gibt = lorem () für ihn ein, aber er muss immer noch manuell die Eingabetaste drücken. Charles hat versucht, das Makro so zu bearbeiten, dass es den Befehl Enter enthält, sodass beim Klicken auf die Makroverknüpfung der Text eingegeben wird, jedoch ohne Erfolg.

Wenn Ihr Makro das Drücken der Eingabetaste simulieren soll, müssen Sie den Befehl SendKeys verwenden. Die Chancen stehen gut, dass Ihr Makro beim Aufzeichnen sehr ähnlich aussieht:

Sub Macro1()

' ' Macro1 Macro ' '     Selection.TypeText Text:="=lorem()"

Selection.TypeParagraph End Sub

Was Sie tun müssen, ist, die letzte Zeile des Makros (die unmittelbar vor End Sub) durch eine der folgenden zu ersetzen:

SendKeys "~", True     SendKeys "{ENTER}", False

Jede dieser Zeilen (Sie benötigen nur eine) simuliert das Drücken der Eingabetaste. Es gibt jedoch ein Problem, das Sie beachten sollten: SendKeys funktioniert in jedem Fenster, das gerade aktiv ist. Dies bedeutet, dass Sie das Makro nicht im Visual Basic-Editor ausführen und den gewünschten Effekt erzielen können. Der Grund dafür ist, dass dabei das Fenster im Editor aktiv ist, sodass SendKeys in diesem Fenster die Eingabetaste drückt. Sie sollten das Makro nur ausführen, wenn Ihr Word-Dokumentfenster aktiv ist.

Abgesehen davon gibt es eine andere Möglichkeit, sich dem Makro zu nähern, ohne den Befehl SendKeys zu verwenden. Alles, was Sie tun müssen, ist, ein neues Word-Dokument zu erstellen, das Ihren Lorem-Ipsum-Text enthält, gefolgt von allem, was Sie möchten. Nennen Sie dies etwas Einzigartiges wie LoremText.docx.

Erstellen Sie dann ein Makro wie das folgende:

Sub Lorem()

Selection.InsertFile FileName:="C:\Users\User\Desktop\LoremText.docx"

End Sub

Sie müssen nur sicherstellen, dass der im Makro angezeigte Pfad und Dateiname den tatsächlichen Pfad und Dateinamen darstellt, der für Ihr System geeignet ist.

Wenn Sie das Makro ausführen, geht Word aus und greift nach dem Dokument LoremText.docx und fügt es an der Einfügemarke ein.

Schließlich gibt es eine andere Möglichkeit, dieses Problem zu lösen, ohne auf Makros zurückgreifen zu müssen. Falls gewünscht, können Sie den Lorem-Ipsum-Text in Ihr Dokument einfügen, auswählen und als Baustein oder als AutoKorrektur-Eintrag speichern. Mit diesen Word-Werkzeugen können Sie den nach Belieben geänderten Text einfach einfügen. (Das Erstellen und Verwenden von Bausteinen und AutoKorrektur-Einträgen wurde in anderen WordTips behandelt.)

_Hinweis: _

Wenn Sie wissen möchten, wie die auf dieser Seite (oder auf einer anderen Seite der WordTips-Websites) beschriebenen Makros verwendet werden, habe ich eine spezielle Seite vorbereitet, die hilfreiche Informationen enthält.

WordTips ist Ihre Quelle für kostengünstige Microsoft Word-Schulungen.

(Microsoft Word ist die beliebteste Textverarbeitungssoftware der Welt.) Dieser Tipp (13484) gilt für Microsoft Word 2007, 2010, 2013 und 2016.