Delete Hidden content control
I have form that hides content control rich text
I would like the user to have an option to erase hidden content control :
Private Sub cmdEraseblank_Click()
Dim cc As ContentControl
For Each cc In ActiveDocument.ContentControls
If cc.Range.Font.Hidden = True Then
cc.Range.delete True
End If
Exit For
Next cc
End Sub
Cheers,
|