Subaddress Property Example
This example sets the address and subaddress for the specified hyperlink.
Set hyp = Spreadsheet1.Range("a12").Hyperlink hyp.Address = "http://www.microsoft.com/ExcelDev/e-tips.htm" hyp.Subaddress = "top"