lifeson
06-10-2009, 10:08 AM
Hi all
Thanks to some searching on here I found how to follow a hyperlink when double clicking on a text box on a form :thumb
Private Sub txtLink_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
On Error Resume Next
ActiveWorkbook.FollowHyperlink Address:=fileLink, NewWindow:=True
End Sub
where fileLink is the text from a cell
dim fileLink as string
'..............
fileLink = ws.Cells(rw, "S")
However if when inserting the hyperlink I use alternative text to display rather than displaying the full path I cant get it to work :think:
Question is how do I get fileLink to equal the actual address from the cell and not the text displayed?
Thanks to some searching on here I found how to follow a hyperlink when double clicking on a text box on a form :thumb
Private Sub txtLink_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
On Error Resume Next
ActiveWorkbook.FollowHyperlink Address:=fileLink, NewWindow:=True
End Sub
where fileLink is the text from a cell
dim fileLink as string
'..............
fileLink = ws.Cells(rw, "S")
However if when inserting the hyperlink I use alternative text to display rather than displaying the full path I cant get it to work :think:
Question is how do I get fileLink to equal the actual address from the cell and not the text displayed?