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 (426) gilt für Microsoft Word 97, 2000, 2002 und 2003. Sie finden eine Version dieses Tipps für die Multifunktionsleistenschnittstelle von Word (Word 2007) und später) hier: