Moin, ich versteh was nicht.
das funzt nicht:
Set ad = ActiveDocument ad.Paragraphs.Last.Range.Font.Hidden = True
Aber das schon:
Set ad = ActiveDocument ad.Paragraphs.Last.Range.Select Selection.Font.Hidden = True
Warum ist das so?