Wie aktualisiere ich alle Felder in einem Word-Dokument?

Ich mache einfach Ctrl+ A-, um alles auszuwählen - und dann F9 das Los zu aktualisieren.

Obwohl dies Kopf- und Fußzeilen vermisst, werden sie aktualisiert, wenn Sie IIRC drucken / drucken.

Aktualisieren

Ich habe das folgende Makro gefunden. Bei einem Schnelltest wurden Inhaltsverzeichnisse, Felder innerhalb von Absätzen, Felder innerhalb der Kopf- und Fußzeile und Felder innerhalb einer Floating-Textfeld-Abbildung aktualisiert.

Hoffentlich deckt das alles ab, was Sie brauchen. Wenn nicht, geben Sie bitte an, was noch nicht aktualisiert werden kann.

Quelle: http://www.gmayor.com/installing_macro.htm

Sub UpdateAll() Dim oStory As Range For Each oStory In ActiveDocument.StoryRanges oStory.Fields.Update If oStory.StoryType <> wdMainTextStory Then While Not (oStory.NextStoryRange Is Nothing) Set oStory = oStory.NextStoryRange oStory.Fields.Update Wend End If Next oStory Set oStory = Nothing End Sub 

Gehen Sie in die Druckeinstellungen und wählen Sie Aktualisierungsfelder aus. Dann gehen Sie zum Drucken oder drucken Sie eine Vorschau Ihres Dokuments.

Et voilà, alle Felder werden aktualisiert!

Diese Seite sieht interessant aus:

Wenn Sie Word 2007 verwenden, ist der Vorgang ein wenig anders: Klicken Sie auf die Schaltfläche Office und dann auf Word-Optionen. Word zeigt das Dialogfeld Word-Optionen an. Klicken Sie auf der linken Seite des Dialogfelds auf Erweitert. (Klicken Sie hier, um eine verwandte Abbildung anzuzeigen.) Vergewissern Sie sich, dass im Bereich "Allgemein" (ein wenig nach unten scrollen), dass das Kontrollkästchen "Automatische Links beim Öffnen aktualisieren" aktiviert ist. Klicken Sie auf OK. Diese Einstellung sollte sicherstellen, dass alle Links immer auf dem neuesten Stand sind. Wenn Sie die Felder beim Öffnen des Dokuments aktualisieren möchten, müssen Sie zum Ausführen der Aufgabe ein Makro verwenden. Insbesondere müssen Sie entweder ein AutoOpen- oder ein AutoClose-Makro verwenden, je nachdem, ob Sie die Felder aktualisieren möchten, wenn das Dokument geöffnet oder geschlossen wird. Das folgende Beispiel zeigt ein AutoOpen-Makro, das Sie verwenden können.

Sub AutoOpen() With Options .UpdateFieldsAtPrint = True .UpdateLinksAtPrint = True End With ActiveDocument.Fields.Update End Sub 

Beachten Sie, dass das Makro sicherstellt, dass die Optionen so eingestellt sind, dass die Aktualisierung der Felder und Verknüpfungen beim Drucken erzwungen wird. Anschließend werden alle Mitglieder der Fields-Auflistung im Dokument aktualisiert. Wenn Sie stattdessen die Felder beim Schließen aktualisieren möchten, können Sie dieses Makro verwenden:

Sub AutoClose() ActiveDocument.Fields.Update End Sub 

Dieses Makro ist viel kürzer, da beim Beenden des Dokuments keine Optionen zum Aktualisieren beim Drucken festgelegt werden müssen.

Wenn Sie alle Kopf- und Fußzeilen ordnungsgemäß aktualisieren möchten, hat dies für mich funktioniert:

 Dim oStory As Range Dim oSection As Object Dim oHeader As Object Dim oFooter As Object  For Each oStory In ActiveDocument.StoryRanges oStory.Fields.Update Next oStory  For Each oSection In ActiveDocument.Sections For Each oHeader In oSection.Headers oHeader.Range.Fields.Update Next oHeader  For Each oFooter In oSection.Footers oFooter.Range.Fields.Update Next oFooter Next oSection 

Word 2010:

Klicken Sie mit der rechten Maustaste auf die Multifunktionsleiste, passen Sie die Multifunktionsleiste an, wählen Sie den Befehl "Alle Befehle" aus, suchen Sie nach "Update" und fügen Sie ihn an der gewünschten Stelle ein.

Diese Schaltfläche aktualisiert nur ausgewählte Felder.
Um alle Felder zu aktualisieren, drücken Sie Ctrl+ und Adann diese Taste.

Für c #:

using System; using System.Collections.Generic; using System.IO; using Microsoft.Office.Interop.Word;  class Program { static void Main(string[] args) { List<string> path = new List<string>(args);  string filePathstr = string.Join(" ", path.ToArray()); //System.Windows.Forms.MessageBox.Show("filepathstr: " + filePathstr);  string folderPathstr = Path.GetDirectoryName(filePathstr); //System.Windows.Forms.MessageBox.Show("folderPathstr: " + folderPathstr);  try { Application ap = new Application(); Document document = ap.Documents.Open(filePathstr); document.Fields.Update();  foreach (Section section in document.Sections) { document.Fields.Update(); // update each section  HeadersFooters headers = section.Headers; //Get all headers foreach (HeaderFooter header in headers) { Fields fields = header.Range.Fields; foreach (Field field in fields) { field.Update(); // update all fields in headers } }  HeadersFooters footers = section.Footers; //Get all footers foreach (HeaderFooter footer in footers) { Fields fields = footer.Range.Fields; foreach (Field field in fields) { field.Update(); //update all fields in footers } } }   document.Save(); document.Close();  } catch (NullReferenceException) { System.Windows.Forms.MessageBox.Show("A valid file was not selected."); } } }