hyperlink to button

[EDUCATED MONKEY]

I have created the hyperlink/links no problem instead of a clickable link in a cell I would like to have a button is the a way to call the excell =hyperlink function, at present the excel formula is =HYPERLINK(O2,D2)<?xml:namespace prefix = o ns = "urn:schemas-microsoft-comfficeffice" /><o></o>
Where O2 is the text to be converted and D2 the friendly name, which I would like to pass to the buttons caption property, I have looked all over the place for vba code to do this but only found cod to creat the hyperlink which I allready have <o></o>

 

[Jerry Sullivan]

Check out the ActiveWorkbook.FollowHyperlink Method.

Below are three examples that show:
1. Hyperlink directly to a filepath
2. Hyperlink to a URL address
3. Hyperlink to an indirect address (similar to your current worksheet formula).

Private Sub CommandButton1_Click()
    ActiveWorkbook.FollowHyperlink Address:="C:\TEST\MyFile.pdf"
End Sub
 
Private Sub CommandButton2_Click()
    ActiveWorkbook.FollowHyperlink Address:="http://www.mrexcel.com/forum/", _
        NewWindow:=True
End Sub
 
Private Sub CommandButton3_Click()
    ActiveWorkbook.FollowHyperlink Address:=Sheets("Sheet1").Range("D2").Value
End Sub