VBA for searching location in Google Maps

[thomasnormal]

Hi all,

My question is....

How to capture the value in the cell within column B instead of B11 cell only?

For example, user can select any address in column B cell in order to search location at Google Maps.

-----------------------------------------------------------------------------------------------------
' Open Internet Explorer
Sub DoBrowseBlackboard(urlName)
Dim ie As Object
Set ie = CreateObject("Internetexplorer.Application")
ie.Visible = True
ie.Navigate urlName
End Sub


' Copy address to Google Maps
Public Sub mcrURL(control As IRibbonControl)
Dim url As String
url = "https://maps.google.com/?q=" & Range("B11").Value
Call DoBrowseBlackboard(url)
End Sub

 

[thomasnormal]

Found the solution. Closed.