VB.net Excel新增超連結(網頁GoogleMaps、本機檔案路徑)

宣告物件方式，省略，因之前文件有介紹過了
寫入本機目錄，可開啟檔案。
若寫入網址，可開啟網頁。
以下為 利用GoogleMaps查詢 地址名稱 及 經緯度的範例

http://maps.google.com.tw/maps?q=臺北市忠孝東路一段xxx號
http://maps.google.com.tw/maps?q=25.xxx,121.xxxx

dr(xx).ToString '為資料庫擷取出來的資料

With objExcel.sheets("sheet1")

'基地台有資料，再送GOOGLE 查詢
.Hyperlinks.Add(.Range("A2").offset(i, 11), "http://maps.google.com.tw/maps?q=" & TransFmt_Address990930(dr(21).ToString), "", "點選我開啟網頁喔", dr(21).ToString)
.Hyperlinks.Add(.Range("A2").offset(i, 15), "http://maps.google.com.tw/maps?q=" & dr(24).ToString & "," & dr(23).ToString, "", "點選我開啟網頁喔", dr(21).ToString)

End If