0

如果我的请求不够清楚，我很抱歉，但我正在努力让我的 Excel 宏正常运行。

问题是这样的：我希望能够标记一个特定的网址并在 Excel 上链接到它。不同之处在于，我希望能够通过更改单元格值来更改该标签。

无论您提供什么参数，我感兴趣的网站都会以相同的方式（表格格式）检索数据。所以我希望能够给它一个特定的字符串（由不同的组件组成）并让它检索我需要的东西。

我尝试制作一个宏来执行此操作，但它似乎不想将自定义地址复制/粘贴到数据输入的查询框中。鉴于此，有没有办法让它获取地址的单元格值，或者更改宏的语法以连接新地址？

地址：

http://a810-bisweb.nyc.gov/bisweb/PropertyProfileOverviewServlet?boro= 1 &houseno= 220 &street= west+20th+street &go2=+GO+&requestid=0&t10=y" _

变量以粗体显示。

宏脚本如下所示：

使用 ActiveSheet.QueryTables.Add(Connection:="URL; http://a810-bisweb.nyc.gov/bisweb/PropertyProfileOverviewServlet?boro= 1 &houseno= 220 &street= west+20th+street &go2=+GO+&requestid=0&t10 =y" _ , 目的地:=Range("$A$9"))

如何从 Excel 单元格中获取这些值并将它们插入到宏中？

（最终，我想使用这些值来做几件事，包括创建目录和插入 Word 文件......但那是以后的事！:)）

TIA……我希望……

（PS，抱歉格式化......我认为我做对了......）

首先回答....回答（我是菜鸟，不能在 8 小时内发布回复...）

->谢谢，我试图在不带任何空格的 XL 格式中使用旧的“&”符号。我明天会试试看它是否有效。

关键是能够输入任何地址（此时我将不得不使用格式化语句，“+”表示空格）并运行宏以获取稍后使用的信息。

太虚了！！！

4

2 回答 2

0

您可以像这样从单元格中获取值：

只需使用“&”将字符串的每个部分连接到您的单元格引用。

这是假设单元格 A1 = 1、 A2 = 220和 A3 = west+20th+street

Sub queryURL()

myURL = "URL;http://a810-bisweb.nyc.gov/bisweb/PropertyProfileOverviewServlet?boro=" & Range("A1") & "&houseno=" & Range("A2") & "street=" & Range("A3") & "&go2=+GO+&requestid=0&t10=y"

With ActiveSheet.QueryTables.Add(Connection:=myURL, Destination:=Range("A9"))

End With

End Sub
于 2013-11-06T00:20:16.737 回答
0

现在我只是调整子字段（如果这是正确的术语）以获得正确的设置（例如 x1overwritecells 而不是 x1insertdeletecells...）。

最终结果是希望能够手动输入数据字段或将它们以列表格式显示，我将能够构建多个模板报告表单以便以后轻松分发。

这是第一部分，数据输入和处理成“漂亮”的格式。接下来将了解如何使用这些数据并将其直接导出/导入到 XL 文件（简单）和 Word 文件（如果可能，不使用邮件合并）。

如果有人对此有任何建议，我会欢迎他们，但无论如何，我都在自己努力。

再次感谢！

于 2013-11-24T23:27:37.430 回答