Excel：获取单元格内容以生成Google地图Url

我遵循了本教程：

现在我的excel样式表中有一个谷歌地图，公式如下：

http://maps.google.com/maps?saddr="&$B$1&"&addr="&$B$2&"&addr="&$B$3&"

=”http://maps.google.com/maps?saddr=&B1&&addr=“&B2&”&daddr=“B3”

B1包含马德里 B2包含巴塞罗那 B3包含塞维利亚

它在地图上标出了标记

---

现在我想用鼠标选择单元格（B1、B8、B14、B17…或从B1到B25）并生成公式。这可能吗？

您可以使用输入提示，然后连接响应。以下是如何从用户处获取范围：

On Error Resume Next
    Application.DisplayAlerts = False
        Set rRange = Application.InputBox(Prompt:= _
            "Please select cells with your mouse.", _
                Title:="SPECIFY RANGE", Type:=8)
On Error GoTo 0
    Application.DisplayAlerts = True

    If rRange Is Nothing Then
        Exit Sub
    End If

URL = "http://maps.google.com/maps?s"

For Each cell In rRange
   URL = URL & "addr=""&" & cell.Address & "&""&"
Next

URL = Left(URL, Len(URL) - 1)

Range("C1").FormulaLocal = URL

C1中的输出如下所示：

http://maps.google.com/maps?saddr="&$B$1&"&addr="&$B$2&"&addr="&$B$3&"

---

我已经更新了代码的最后一部分，以便更好地将您的地址串在一起。