Wie kann ich alle Kommentare in einem Word 2010-Dokument automatisch in Fußnoten konvertieren?

4395
Nathan Fellman

Ich begann Kommentare zu Text in Word 2010 zu schreiben und schrieb so viele, dass sie nicht auf die Seite passen. Ich möchte sie in Fußnoten umwandeln, damit sie gut gedruckt erscheinen. Gibt es eine Möglichkeit, Kommentare in Fußnoten umzuwandeln, ohne jeweils Fußnoten zu erstellen?

5

1 Antwort auf die Frage

4
tohuwawohu

AFAIK gibt es keine eingebauten Funktionen, aber es ist eine einfache Aufgabe für ein VBA-Makro (das ich hier gefunden habe ):

 Sub comment2footnote() Application.ScreenUpdating = False Dim oDoc As Document, oComment As Comment Set oDoc = ActiveDocument For Each oComment In ActiveDocument.Comments oDoc.Footnotes.Add Range:=oComment.Scope, Text:=oComment.Range.Text oComment.Delete Next Application.ScreenUpdating = True End Sub

Dies fügt Fußnoten für jeden Kommentar ein, kopiert den Kommentartext und entfernt den Kommentar anschließend.

Verwandte Probleme