Alles in Word 2016 einblenden

Alles in Word 2016 einblenden

Ich habe die Suchfunktion in Word 2016 verwendet, um alles auszublenden, was nicht hervorgehoben ist. Als Ergebnis wird mir nur der hervorgehobene Text angezeigt. Wenn ich ihn jedoch wieder einblenden möchte, wird nur ein bestimmter Teil des Textes angezeigt. Beispiel: Mein Word-Dokument besteht aus Abschnittsumbrüchen. Wenn ich versuche, alles einzublenden, bleiben Fußzeilen und Kopfzeilen ausgeblendet. Ich muss jede Kopf- und Fußzeile durchgehen und sie manuell einblenden.

Gibt es eine Möglichkeit, mit der Ersetzungsfunktion das Anzeigen aller Elemente zu erzwingen?

Antwort1

Sie haben noch keine Antwort erhalten. Vielleicht möchten Sie mit einem Makro arbeiten, das in Word 2010 funktioniert. Dieses Makro blendet alle ausgeblendeten Texte ein, einschließlich Text in Kopf- und Fußzeilen.

Sub UnhideEverything()

Dim rngStory As Range
Dim rngToSearch As Range
Dim rngResult As Range
For Each rngStory In ActiveDocument.StoryRanges
               Set rngToSearch = rngStory
    Set rngResult = rngToSearch.Duplicate

    Do
        If rngResult.Font.Hidden Then
            rngResult.Font.Hidden = False

        End If
        rngResult.MoveStart wdWord
        rngResult.End = rngToSearch.End
    Loop Until rngResult.Find.Found = False

    Next rngStory

End Sub

verwandte Informationen