Hyperlink in subform not working

[bradp1979]

I have subform with a hyperlink, but although it acts like a hyperlink (mouse pointer changes to the finger pointing thing), when clicked, nothing happens. I know I need to create an "On click" event procedure, but I'm not doing it right.

Can someone help me out?

[ranman256]

what about CTL-click? did you try that?

[June7]

Is this a Hyperlink type field or just a text field with url string? Or is this just a command button? Are you using FollowHyperlink? Post your code.

[bradp1979]

I believe it is a hyperlink type field; I selected "yes" for the "is hyperlink" property. Not a command button. And there is no code written for that box that I'm aware of. The control source is a column in the employee table, and it's a valid hyperlink. If I copy it and paste it into an address bar, it works.

[June7]

Selecting Is Hyperlink Yes does not make it a hyperlink type field. Hyperlink field would be defined in table design. Setting Is Hyperlink Yes on a textbox bound to a text field just makes the text look like a hyperlink although it really isn't. Requires code to make the string work like a hyperlink. That's what FollowHyperlink is for. However, it doesn't always seem to work. Example from my db:

Private Sub btnLink_Click()
On Error GoTo ErrProc
'FollowHyperlink is not working properly
''Application.FollowHyperlink Me.tbxLink
Dim wsShell As Object
Set wsShell = CreateObject("WScript.Shell")
wsShell.Run Chr(34) & Me.tbxLink & Chr(34)
Me.Title.SetFocus
ExitProc:
Set wsShell = Nothing
Exit Sub
ErrProc:
MsgBox "Cannot open document. Contact database administrator. : " & Err.Number
End Sub

A button has a HyperlinkAddress property - no code is needed, just click the button.

[bradp1979]

Makes sense. So what code would I write for Private Sub txtDocument_Click() to give it the best chance of working? I tried DoCmd.FollowHyperlink, but "FollowHyperlink" isn't an option for DoCmd.

[June7]

I show the code in my example. It is the commented line:

Application.FollowHyperlink Me.tbxLink

https://msdn.microsoft.com/en-us/lib...or=-2147217396
http://allenbrowne.com/func-GoHyperlink.html

[bradp1979]

I'm getting an error message when I click it saying "Compile error: Method or data member not found"

[June7]

Me.tbxLink is reference to textbox on my form. Use your textbox name.