Excel IQY文件 - 使用选项问题

时间:2009-09-23 19:12:02

标签: excel excel-web-query

我有一个简单的Excel IQY文件,其中的内容如下所示:

WEB
1
http://somesite.html

Selection=EntirePage
Formatting=None
PreFormattedTextToColumns=True
ConsecutiveDelimitersAsOne=True
SingleBlockTextImport=False
DisableDateRecognition=False
DisableRedirections=False

这很简单,没问题。

我需要做的是添加选项以打开“打开文件时刷新数据”并打开“在保存工作簿之前从外部数据范围中删除数据”。

在查看“使用情况”选项卡下的连接属性时,我找到了这些设置,但是,我无法找到我在IQY文件中设置这些设置的位置,以便默认情况下检查这两个选项使用iqy文件时。

谢谢!

1 个答案:

答案 0 :(得分:1)

我尝试了一个现有IQY文件的示例&发现那些是DataRange的属性而不是查询。因此,它存储为QueryTable的属性

假设Excel表格中有1个QueryTable。 以下是可用于读取/设置属性的VBA代码,您正在寻找。

按ALT + F11(您将看到VBA编辑器)
按CTRL + G(即时窗口)
逐个输入以下声明&看看有什么要说的

Msgbox ActiveSheet.QueryTables(1).RefreshOnFileOpen
Msgbox ActiveSheet.QueryTables(1).SaveData

然后,尝试&从代码中设置这些属性,并在DataRange属性对话框中查看它的效果。

ActiveSheet.QueryTables(1).RefreshOnFileOpen = True
ActiveSheet.QueryTables(1).SaveData = True

希望有所帮助。