1: 2: 3: 4: 5: 6: 7:
Sub FormatHyperlinkFont () Schemerige hyp als Hyperlink Voor Elke hyp in ActiveDocument.Hyperlinks hyp. Range.Font.Bold = Waar Volgende hyp Sub van het eind