How to create a hyperlink?

[10geoff732]

Hi.
I had a quick look for this question on the site, but couldn't find what I was after.

I have a Form where there are two fields [Taddress] and [Tsuburb]. (if need be there is also a [TGeocode] field

I would like to assist our old analyst by joining the fields [Googlelink] so that they are clickable and will open into google maps. i.e.

="https://www.google.com/maps/place".... [Taddress].... [TSuburb]

Ive seen a few sites where they are having to go into and "build" the hyperlink from a table .

Is there another way of doing it as the form stores about a 1000 addresses? Ive got it to a stage that it will just cut and paste into a browser but figured there must be a way to just click from the link.

Any suggestions and as always thanks for any assistance provided .

[NeoPa]

Hi Geoff.

Check out Error 7980: HyperlinkAddress or HyperlinkSubAddress read-only for Hyperlink. If it doesn't solve your problem let us know. It should have everything you need. Good luck.

[ADezii]

1. Here is some very simple Code that will Open Google Maps to a specific Address & City. It can easily be adapted to include State, Zip Code, and Country if need be.
   

   Public Sub FindOnGoogleMaps(strAddress As String, strCity As String)
   Dim strURL As String
    
   strURL = "http://maps.google.com/maps?q=" & strAddress & ",+" & strCity
    
   Application.FollowHyperlink strURL
   End Sub

2. Sample Call:
   

   Call FindOnGoogleMaps("2927 South 15th Street", "Philadelphia")

[NeoPa]

Hi ADezii.

I believe you may have got the wrong end of the stick on this one. Rather than linking directly, I believe the OP wants to formulate a hyperlink so that it can be clicked on normally from the displayed text.

Always good to see you post anyway of course :-)

[ADezii]

As you can see, I'm still getting things backwards (sdrawkcab). Good to see you!

[NeoPa]

: - )

[10geoff732]

Hi and thanks for the input. Im hoping to have a look at this on the weekend and will let know you how it goes (or if I stuff it up lol)

Thanks again for the advice

[NeoPa]

All good :-)

Let us know how you get on with it.