Worksheet.Hyperlinks (Excel)

Returns a Hyperlinks collection that represents the hyperlinks for the worksheet.

Dim hypsHyperlinks As Hyperlinks
Set hypsHyperlinks = ActiveSheet.Hyperlinks