Question

如果我没有让我的请求足够清楚，我很抱歉，但我想让我的Excel宏行为。

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

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

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

地址：

http://a810-bisweb.nyc.gov/bisweb/PropertyProfileOverviewServlet?boro=的 1 ＆安培;的HouseNo = 220 ＆安培;街道= 西+ 20 +街＆安培; GO 2 = + GO +＆amp; requestid = 0＆amp; t10 = y“_

粗体变量。

宏脚本如下：

使用ActiveSheet.QueryTables.Add（连接：=“URL; http://a810-bisweb.nyc.gov/bisweb/PropertyProfileOverviewServlet?boro= 1 ＆amp; houseno = 220 ＆amp; street = west + 20 +街＆amp; go2 = + GO +＆amp; requestid = 0＆amp; t10 = y“_ ，目的地：=范围（“$ A $ 9”））

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

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

TIA ......我希望......

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

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

- ＆gt;谢谢，我试图使用旧的“＆amp;” XL格式的符号，没有任何空格。我明天会试一试，看看它是否有效。

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

tyVm !!!

Answer 1

你可以从这些单元格中获取值：

使用“＆amp;”将字符串的每个部分连接到您的单元格引用。

假设单元格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

Answer 2

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

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

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

如果有人对此提出任何建议，我会欢迎他们，但无论如何，我都会自己动手。

再次感谢！

Excel - 宏 - 来自Web的数据 - 如何使提取值等于单元格值？

2 个答案: