0

我正在尝试安排一个 vba 脚本。我正在通过公司服务器工作,想知道是否由于管理限制而无法访问?这是代码:

 Dim xlApp
 Dim xlBook

 Set xlApp = CreateObject("Excel.Application")
 Set xlBook = xlApp.Workbooks.Open("\\Computer\denfs1\data\1EpUSRgltry\Permitting - Wells &    Sundries\WEST (CO-MT-ND)\Schedules & Status\Planning and Permiting Spread sheet(West) Permit and    Planning spread sheet.xlsm", 0, True)
 xlApp.Run "Click"
 xlBook.Close
 xlApp.Quit

 Set xlBook = Nothing
 Set xlApp = Nothing

这是我得到的错误在此处输入图像描述

4

2 回答 2

1

宏“点击”有什么作用?如果它进行了更改,请关闭它而不保存(如果要通过 Click 宏保存更改,请更改为 True)。

xlBook.Close False

您可能还想通过xlApp.Visible = True在打开 .xlsm 工作簿之前放置来从 Excel 中进行调试。

可能有一个隐藏的 Excel.exe 从先前的脚本执行中锁定了同一个文件(假设您在宏“单击”完成之前按 Ctrl-C)。关闭所有可见的 Excel 窗口并确保任务管理器中没有运行 Excel.exe。

如果当 Excel 要求您保存对它的更改时继续按取消,即使 vbs 没有发现任何错误,它也会卡在后台。

于 2013-08-23T03:01:46.903 回答
0

问题是文件名的语法错误...确保整个字符串准确无误:/

于 2013-08-22T15:54:25.783 回答