Zum Hauptinhalt springen

Kutools für Office — Eine Suite. Fünf Tools. Erledigen Sie mehr.

Wie konvertiert man Kommentare in Fußnoten oder Endnoten in Microsoft Word?

Author Siluvia Last modified

Angenommen, es gibt mehrere Kommentare in Ihrem Word-Dokument, wie können Sie all diese Kommentare gleichzeitig in Fußnoten oder Endnoten umwandeln? Dieser Artikel bietet VBA-Methoden, um dies zu erreichen.

Kommentare mit VBA-Code in Fußnoten oder Endnoten umwandeln


Kommentare mit VBA-Code in Fußnoten oder Endnoten umwandeln

Der folgende VBA-Code kann Ihnen helfen, schnell alle Kommentare im aktuellen Dokument in Fußnoten oder Endnoten umzuwandeln. Bitte gehen Sie wie folgt vor.

1. Öffnen Sie das Dokument, das die Kommentare enthält, die Sie in Fußnoten oder Endnoten umwandeln möchten, und drücken Sie die Tasten Alt + F11, um das Fenster Microsoft Visual Basic for Applications zu öffnen.

2. Klicken Sie im Fenster Microsoft Visual Basic for Applications auf Einfügen > Modul. Kopieren Sie dann den folgenden VBA-Code in das Modulfenster.

VBA window with a module inserted

VBA-Code: Kommentare in Fußnoten umwandeln:

Sub ConvertCommentsToFootnotes()
    Dim xComm As Comment
    Dim xCommRange As Range
    Dim xDoc As Document
    Application.ScreenUpdating = False
    Set xDoc = ActiveDocument
    For Each xComm In xDoc.Comments
        Set xCommRange = xComm.Range
        xDoc.Footnotes.Add xComm.Scope, , xCommRange.Text
        xComm.Delete
    Next
    Application.ScreenUpdating = True
End Sub

VBA-Code: Kommentare in Endnoten umwandeln:

Sub ConvertCommentsToEndnotes()
    Dim xComm As Comment
    Dim xCommRange As Range
    Dim xDoc As Document
    Application.ScreenUpdating = False
    Set xDoc = ActiveDocument
    For Each xComm In xDoc.Comments
        Set xCommRange = xComm.Range
        xDoc.Endnotes.Add xComm.Scope, , xCommRange.Text
        xComm.Delete
    Next
    Application.ScreenUpdating = True
End Sub

3. Drücken Sie die Taste F5, um den Code auszuführen.

Dann werden alle Kommentare im aktuellen Dokument basierend auf dem angewendeten VBA-Code sofort in Fußnoten oder Endnoten umgewandelt.


Verwandte Artikel:

Erledigen Sie mehr in weniger Zeit mit KI-optimierten Kutools für Word

Kutools für Word ist nicht nur eine Sammlung von Werkzeugen – es ist eine intelligente Lösung, die entwickelt wurde, um Ihre Produktivität zu steigern. Mit KI-gestützten Funktionen und den wichtigsten Features hilft Ihnen Kutools, mehr in weniger Zeit zu erreichen:

  • Fassen Sie Inhalte zusammen, schreiben Sie sie um, verfassen Sie neue Texte und übersetzen Sie sie sofort.
  • Texte in Echtzeit korrekturlesen mit Vorschlägen zur Grammatik, Interpunktion und zum Stil, während Sie schreiben.
  • Inhalte umformulieren und übersetzen, ohne das Layout, den Stil oder die Struktur zu verändern.
  • Übersetzen Sie Ihre Inhalte mühelos in über 40 Sprachen und erweitern Sie so Ihren globalen Einfluss.
  • Erhalten Sie sofortige Hilfe und intelligente Einblicke basierend auf dem Inhalt Ihres aktuellen Dokuments.
  • Fragen Sie, wie Sie eine Aufgabe ausführen – wie das Entfernen von Abschnittsumbrüchen – und die KI wird Sie anleiten oder es für Sie erledigen.
  • Schwärzen Sie sensible oder vertrauliche Informationen innerhalb von Sekunden, um absolute Privatsphäre zu gewährleisten.
  • Alle Werkzeuge arbeiten nahtlos innerhalb von Word und sind immer griffbereit.
  • Dokumente mühelos erstellen, verfeinern, übersetzen, zusammenfassen und schützen.
  • Grammatik, Klarheit und Tonfall in Echtzeit verbessern, während Sie schreiben.
  • Inhalte umformulieren und übersetzen, ohne Änderungen am Layout oder der Formatierung vorzunehmen.
  • Fragen Sie, wie Sie eine Aufgabe ausführen – wie das Entfernen von Abschnittsumbrüchen – und die KI wird Sie anleiten oder es für Sie erledigen.
  • Alle Werkzeuge arbeiten nahtlos innerhalb von Word und sind immer griffbereit.
Erfahren Sie mehr über Kutools für Word Jetzt herunterladen
Kutools for Word features

Die besten Produktivitätstools für das Büro

Kutools for Word – Erweitern Sie Ihr Word-Erlebnis mit mehr als 100 bemerkenswerten Funktionen!

🤖 Kutools AI Features: KI-Assistent / Echtzeit-Assistent / Super Polieren (Format beibehalten) / Super Übersetzen (Format beibehalten) / KI-Redaktion / KI Korrekturlesen ...

📘 Dokument beherrschen: Seiten aufteilen / Dokumente zusammenführen / Bereich in verschiedenen Formaten exportieren (PDF/TXT/DOC/HTML ...) / Stapelweise Konvertierung zu PDF ...

Text bearbeiten: Stapelweise Suchen und Ersetzen in mehreren Dateien / Alle Bilder skalieren / Tabelle transponieren (Zeilen und Spalten) / Tabelle in Text umwandeln ...

🧹 Mühelos reinigen: Zusätzliche Leerzeichen entfernen / Abschnittsumbrüche / Textfeld / Verknüpfungen / Weitere Entfernen-Werkzeuge finden Sie in der Gruppe Entfernen ...

Kreative Einfügen: Tausendertrennzeichen einfügen / Kontrollkästchen / Optionsfeld / QR-Code / Barcode / Mehrere Bilder / Entdecken Sie weitere Funktionen in der Gruppe Einfügen ...

🔍 Präzise Auswahl: Einzelne Seiten, Referenztabellen, Form, Überschriftenabsatz gezielt festlegen / Navigation mit weiteren Auswählen -Features verbessern ...

Besondere Erweiterungen: Zu jedem Bereich navigieren / Automatisches Einfügen von wiederkehrendem Text / Zwischen Dokument-Fenster umschalten /11 Konvertierungs-Werkzeuge ...

🌍 Unterstützt über40 Sprachen: Nutzen Sie Kutools in Ihrer bevorzugten Sprache – Englisch, Spanisch, Deutsch, Französisch, Chinesisch und über40 weitere!

Kutools and Kutools Plus tabs on the Word Ribbon
👉 Möchten Sie diese Funktionen ausprobieren? Jetzt Kutools for Word herunterladen! 🚀
 

✨ Kutools for Office – Eine Installation, fünf leistungsstarke Tools!

Enthält Office Tab Pro · Kutools für Excel · Kutools für Outlook · Kutools for Word · Kutools for PowerPoint

📦 Alle5 Tools in einer Suite erhalten | 🔗 Nahtlose Integration in Microsoft Office | ⚡ Sofort Zeit sparen und Produktivität steigern

Die besten Produktivitätstools für das Büro

Kutools for Word – 100+ Tools für Word