Using the Follow method of the Hyperlink object(user selecting the hyperlink in the Excel application)
Sub followLink() Worksheets("Sheet3").Hyperlinks(1).Follow End Sub