Deaktivieren von Spuränderungen für ausgewählte Bereiche (Microsoft Word)
In Carls Büro wird die Funktion „Änderungen verfolgen“ in Word in großem Umfang verwendet. Die Dokumente werden vor der Fertigstellung mehreren Personen und mehreren Überarbeitungen unterzogen. Die Funktion „Änderungen verfolgen“ funktioniert für diesen Zweck sehr gut, mit einer Ausnahme: Das Dokument enthält in der Fußzeile ein Datumsfeld (gespeichertes Datum). Bei jedem Speichern des Dokuments wird das vorhandene Datum automatisch durchgestrichen und ein eingefügt neues zuletzt gespeichertes Datum. Dies führt schnell zu einer mehrzeiligen Fußzeile überarbeiteter Felder für zuletzt gespeicherte Daten. Carl fragte sich, ob es eine Möglichkeit gibt, Word anzuweisen, die Fußzeile (oder ein bestimmtes Feld, einen Textblock, einen Abschnitt usw.) zu „ignorieren“, wenn Änderungen verfolgen.
Die kurze Antwort lautet: Nein, dazu gibt es keine Möglichkeit. Die Funktion zum Verfolgen von Änderungen ist für das gesamte Dokument aktiviert oder deaktiviert. Dies bedeutet, dass Sie nur einige Optionen haben. Die erste Möglichkeit besteht darin, das Datum in der Fußzeile statisch zu machen, damit es sich nicht ändert. Sie können es durch Text ersetzen (anstatt ein Feld zu verwenden) und dann einfach daran denken, das Datum als einen der letzten Schritte zu aktualisieren, bevor Sie das Dokument fertigstellen oder drucken.
Eine andere Möglichkeit besteht darin, die Änderung in der Fußzeile immer zu akzeptieren, wenn Sie die Datei in Word öffnen. Klicken Sie einfach mit der rechten Maustaste auf das Datum in der Fußzeile und wählen Sie dann Änderung akzeptieren.
Eine weitere Option ist die Verwendung eines Makros, um Ihr Dokument tatsächlich zu speichern (wenn dies der Punkt ist, an dem die Fußzeile aktualisiert wird). Das folgende Makro führt verschiedene Aufgaben aus und kann zur Vereinfachung der Verwendung einer Symbolleistenschaltfläche zugewiesen werden. Zunächst werden alle Fußzeilen im Dokument durchlaufen und alle Felder in den Fußzeilen aktualisiert. Es akzeptiert dann alle Änderungen in diesen Fußzeilen. Schließlich wird das Dokument gespeichert.
Sub Save_NoFooterRevisions() Dim rFooter As Range Dim iSectCount As Integer Dim j As Integer iSectCount = ActiveDocument.Sections.Count For j = 1 To iSectCount Set rFooter = ActiveDocument.Sections(j) _ .Footers(wdHeaderFooterPrimary).Range With rFooter .Fields.Update .Revisions.AcceptAll End With Set rFooter = ActiveDocument.Sections(j) _ .Footers(wdHeaderFooterEvenPages).Range With rFooter .Fields.Update .Revisions.AcceptAll End With Set rFooter = ActiveDocument.Sections(j) _ .Footers(wdHeaderFooterFirstPage).Range With rFooter .Fields.Update .Revisions.AcceptAll End With Next j ActiveDocument.Save End Sub
WordTips ist Ihre Quelle für kostengünstige Microsoft Word-Schulungen.
(Microsoft Word ist die weltweit beliebteste Textverarbeitungssoftware.) Dieser Tipp (10807) gilt für Microsoft Word 2007, 2010, 2013 und 2016. Eine Version dieses Tipps für die ältere Menüoberfläche von Word finden Sie hier: