查找網頁瀏覽器的網址

Question

我已將谷歌世界地圖嵌入到Excel 2010表單中。按CommandButton1的加載此地圖使用此代碼：

Private Sub CommandButton1_Click() 
    link_name = "https://www.google.com/maps" 
    Call Sheets("Sheet3").WebBrowser1.Navigate(link_name) 
End Sub 

當一個國家點擊這張地圖上，網址在每次這樣的事情： https://www.google.com/maps/place/New+Zealand/ ...

我希望能夠找到網址爲了提取被點擊的國家。

如何將WebBrowser1的url作爲字符串獲取？

我沒有優秀的2013年，這顯然會使使用地圖更容易。 任何幫助將不勝感激，謝謝。

Answer 1

您可以使用.LocationURL屬性引用該URL。即：

Dim WebBrowserURL As String 

WebBrowserURL = Sheets("Sheet3").WebBrowser1.LocationURL 

MsgBox WebBrowserURL 

問候，