Hyperlink.Type (Word)

Devuelve el tipo de hipervínculo.

Dim mhtType As Office.MsoHyperlinkType
mhtType = Selection.Hyperlinks(1).Type