Word: Wie finde ich alle gesperrten Felder in einem Dokument?

458
Albin

Kann ich eine Liste aller Felder erhalten, die ich in einem Word-Dokument verwendet habe? Ich möchte herausfinden, welches Feld gesperrt ist, ohne jedes Feld einzeln durchzugehen. Ähnlich wie bei der Liste, wenn Sie alle verknüpften Dateien anzeigen, können Sie beispielsweise auf das Menü zugreifen: Datei -> Informationen -> Verknüpfte Dateien bearbeiten.

Normalerweise verwende ich VBA-Code, um gesperrte Felder durchzugehen (wie in diesem Beispiel: https://word.tips.net/T001367_Locating_Locked_Fields.html ), aber in diesem Fall muss ich dies ohne die Hilfe von VBA tun.

Vielleicht gibt es eine Option, die ich noch nicht gefunden habe, wie alle gesperrten Felder rot zu markieren, die ebenfalls funktionieren würden (obwohl ich eine Liste vorziehen würde).

0

2 Antworten auf die Frage

0
Rich Michaels

Ohne VBA werden Sie keine Funktion finden, die eine Liste von Feldern im Dokument erstellt. Was Sie auf der Registerkarte "Home" tun können, wählen Sie in der Gruppe "Bearbeiten" den Eintrag "Gehe zu" und dann "Felder". Sie können dann ziemlich schnell die Dokumentfelder durchlaufen.

Ja, danke, ich kannte den "GoTo" -Way noch nicht. Sie können auch die Tastenkombination oder die Schaltflächen unter der vertikalen Bildlaufleiste verwenden (deren Namen Sie nicht kennen), um sie ebenfalls zu durchlaufen. Dies gibt mir aber auch die nicht gesperrten Felder. Gibt es eine Möglichkeit zu sehen, ob das Feld gesperrt oder nicht gesperrt ist (ohne den Status gesperrt / nicht gesperrt zu ändern)? Albin vor 5 Jahren 0
0
Rich Michaels

Mit VBA können Sie zu jedem gesperrten Feld im Dokument einen Kommentar hinzufügen. Das bringt Sie näher an die ursprüngliche Liste, die Sie wollten.

Sub FindLockedFields() Dim rng As Word.Range ActiveDocument.Fields.ToggleShowCodes For Each rng In ActiveDocument.StoryRanges With rng.Find .ClearFormatting .Format = True .Forward = True .Text = "^d" .Wrap = wdFindStop .Execute Do While .Found If rng.Fields.Locked = True Then rng.Comments.Add rng, "Locked" End If rng.Collapse Word.WdCollapseDirection.wdCollapseEnd .Execute Loop End With Next ActiveDocument.Fields.ToggleShowCodes

End Sub

Hoffe das hilft

Schöne Idee, aber ich habe bereits VBA-Code, um alle gesperrten Felder durchzugehen. Einen Kommentar hinzuzufügen oder auf andere Weise zu markieren, ist eigentlich kein großer Unterschied - nur eine Zeile Code mehr oder weniger. Aber wie ich in meiner Frage gesagt habe, brauche ich eine Lösung ohne VBA. Es wäre nur interessant zu sehen, ob ein Feld gesperrt oder nicht gesperrt ist (ohne VBA-Code oder Ändern des gesperrten / nicht gesperrten Zustands), da ich Ihre andere Antwort bereits kommentiert habe. Albin vor 5 Jahren 0

Verwandte Probleme