Warning: file_get_contents(/data/phpspider/zhask/data//catemap/0/vba/17.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Excel VBA数据源更改URL_Excel_Vba_Api - Fatal编程技术网

Excel VBA数据源更改URL

Excel VBA数据源更改URL,excel,vba,api,Excel,Vba,Api,我正在使用Excel连接查询来获取数据,但是,我需要更改中的URL,如附件中所示 如何在VBA中访问此字段以仅更改跟踪数据?我试着录制一个宏,但我似乎只能刷新它; ActiveWorkbook.Connections(_ “查询-跟踪器”)。刷新如果您使用的是Excel 2016,则可以从VBA、check和URL访问您的查询 以下是我的方法:- 1-获取目标查询的“公式”(按查询名称;在我的示例中为=“Testing01”),使用 2-更改“myStr”(指向您的新URL),例如,您可以使用

我正在使用Excel连接查询来获取数据,但是,我需要更改中的URL,如附件中所示

如何在VBA中访问此字段以仅更改跟踪数据?我试着录制一个宏,但我似乎只能刷新它; ActiveWorkbook.Connections(_
“查询-跟踪器”)。刷新

如果您使用的是Excel 2016,则可以从VBA、check和URL访问您的查询

以下是我的方法:-

1-获取目标查询的“公式”(按查询名称;在我的示例中为=“Testing01”),使用

2-更改“myStr”(指向您的新URL),例如,您可以使用“Replace”函数

3-将修改后的字符串写回查询:

ThisWorkbook.Queries.Item("Testing01").Formula = myStr
4-刷新您的连接

For Each conn In ThisWorkbook.Connections
  conn.Refresh
Next

非常感谢你!我现在要检查一下。
For Each conn In ThisWorkbook.Connections
  conn.Refresh
Next