Michel bearbeitet ein Dokument, das im Text Informationen enthält, die eigentlich in Fußnoten enthalten sein sollten. Er fragt sich, ob es eine einfache Möglichkeit gibt, den Text auszuwählen, eine Fußnote automatisch zu erstellen und den ausgewählten Text in die Fußnote zu verschieben.

Dies kann natürlich manuell erfolgen. Sie müssen lediglich die folgenden allgemeinen Schritte ausführen:

  1. Wählen Sie den Text aus, der in der Fußnote enthalten sein soll.

  2. Drücken Sie Strg + X. Dadurch wird der Text in die Zwischenablage geschnitten.

  3. Drücken Sie Alt + Strg + F. Dadurch wird eine neue Fußnote erstellt und der Einfügezeiger in der Fußnote selbst platziert.

  4. Fügen Sie den Inhalt der Zwischenablage als einfachen Text ein.

  5. Formatieren Sie den Text der Fußnote wie gewünscht.

Wenn Sie diesen Vorgang ziemlich oft ausführen müssen, können Sie ihn automatisieren, indem Sie ein Makro erstellen, das die gleichen Aktionen ausführt. (Nun, die gleichen Dinge außer den Schritten 1 und 5 – Sie müssen immer noch den Text auswählen, der in die Fußnote verschoben werden soll, und Sie müssen ihn weiterhin formatieren, sobald er in der Fußnote enthalten ist.)

Sub TextToFootnote()

Dim sTemp As String

sTemp = Selection     Selection.Delete     Selection.TypeBackspace     ActiveDocument.Footnotes.Add Range:=Selection.Range, Text:=sTemp End Sub

Das Makro kopiert den von Ihnen ausgewählten Text in die Variable sTemp. Anschließend wird die Auswahl gelöscht, eine Rücktaste eingegeben und eine Fußnote eingefügt, die dem in sTemp gespeicherten Text entspricht. Beachten Sie, dass das Makro nach dem Löschen des Texts aus dem Hauptdokument davon ausgeht, dass das, was Sie ausgewählt haben (und was in die Fußnote verschoben wird)

enthält nicht den führenden Raum.

Sie können das Makro natürlich benutzerfreundlicher machen, indem Sie ihm eine Tastenkombination zuweisen oder es dem Link hinzufügen: / wordribbon-Adding_Tools_to_the_Quick_Access_Toolbar [Quick Access Toolbar]. Mit beiden Methoden können Sie problemlos Text aus dem Hauptteil des Dokuments in die Fußnoten verschieben.

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

(Microsoft Word ist die weltweit beliebteste Textverarbeitungssoftware.) Dieser Tipp (13591) gilt für Microsoft Word 2007, 2010, 2013, 2016, 2019 und Word in Office 365.