Show Hidden Text

[Jim]

Is there a way programatically to toggle the Show and Hide hidden
text?

 

[StevenM]

If your hidden text has a style you could try something like:

Sub ToggleHiddenText()
Dim sStyle As String
sStyle = "Normal"
If ActiveDocument.Styles(sStyle).Font.Hidden = True Then
ActiveDocument.Styles(sStyle).Font.Hidden = False
Else
ActiveDocument.Styles(sStyle).Font.Hidden = True
End If
End Sub

 

[Graham Mayor]

Or even simpler


Sub ToggleHidden()
With ActiveWindow.View
.ShowHiddenText = Not .ShowHiddenText
End With
End Sub

--
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
Graham Mayor - Word MVP


<>>< ><<> ><<> <>>< ><<> <>>< <>><<>