使用Workbooks.OpenXML时如何处理Excel弹出窗口

Question

我尝试使用vbs通过Excel打开XML。

以下是我的代码：

Set myxl = createobject("excel.application")
myxl.DisplayAlerts = False
myxl.Application.Visible = true
myxl.Workbooks.OpenXML "SampleXML.XML",1,xlXmlLoadImportToList

但是当代码运行时，Excel会弹出一个选项来询问如何打开此文件。 对不起，我没有足够的声誉来发布图片。这个弹出窗口会询问你是否打开XML作为＆＃34;作为XML表＆＃34; （我想要，但我不想要弹出窗口），＆＃34;作为只读工作簿＆＃34;，＆＃34;使用XML Source任务窗格＆＃34;。

如何避免这种弹出？

Answer 1

问题是CancelFullGCNotification。它是Excel常量而不是VBScript常量。它的值为SuppressFinialize。您可以在Excel的xlXmlLoadImportToList窗口中查看，如下所示。

试试这个：）

2