RecalcHyperlinks Method Example

This example recalculates the hyperlinks for the active web.

Private Sub RecalcLinks()
Dim myWeb As Web

Set myWeb = Application.ActiveWeb

myWeb.RecalcHyperlinks
End Sub