Hyperlink in Access

T

tr2usa

This is my container form in MS Access to track down import
containers. I would like to get "Website" box to be automaticly
hyperlinked whenever I put Vessel line in "Container line" space. Is
it doable?

Website part is hyperlinked, if I go maually I can link website but I
would like to make it more automated.

I am getting Debug msg for this line:

Forms!Container_details![Website].SetFocus

Thanks for you time.
===================================================================

Private Sub Containerline_AfterUpdate()
Dim strName As String

strName = Forms!Container_details![ContainerLine].Value
strName = UCase(strName)
Forms!Container_details![ContainerLine].Value = strName

Select Case (strName)
Case "Maersk":
Forms!Container_details![Website].Value = "www.maersk.com"
Case Else:
Forms!Container_details![Website] = ""
Forms!Container_details![Website].SetFocus

End Select
End Sub
 
Top