ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Discussion (Misc queries) (https://www.excelbanter.com/excel-discussion-misc-queries/)
-   -   Hyperlink in Access (https://www.excelbanter.com/excel-discussion-misc-queries/148948-hyperlink-access.html)

[email protected]

Hyperlink in Access
 
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



All times are GMT +1. The time now is 05:56 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com