Occurs before the hyperlink structure in the Hyperlinks view is recalculated to view any changes made to the web.
Private Sub expression_OnRecalculateHyperlinks(ByVal pWeb As Web, Cancel As Boolean)
expression An object of type Application declared with events in a class module.
pWeb The WebEx object that contains the view.
Cancel A Boolean that determines if the event will be cancelled. If False, the event will not be cancelled. If True, the event will be cancelled .
The following example prompts the user before recalculating the hyperlink structure. If the user accepts, the event will continue and the hyperlinks will be recalculated.
Private Sub objApp_OnRecalculateHyperlinks(ByVal pWeb As Web, Cancel As Boolean)
'Occurs when the current web's hyperlinks are recalculated.
Dim strAns As String
strAns = MsgBox("This action will cause the hyperlinks structure to be recalculated. " _
& "Do you want to continue?", vbYesNo)
'Set value of Cancel argument to users' response
If strAns = vbYes Then
Cancel = False
Else
Cancel = True
End If
End Sub