我在Windows XP的Excel 2007中编写了VBA宏,用于将数据从excel电子表格复制到PowerPoint演示文稿中。在全新安装的Windows 7上运行启用了宏的电子表格时,该电子表格将失败。因此,我提取了无法找出问题的代码,并且在尝试打开现有的powerpoint文件时似乎失败了。我尝试在Office 2010和Office 2007中都运行此代码。
我正在尝试使用的代码(如下所示的问题部分)
Sub test() Dim PowerPointApplication As PowerPoint.Application Dim PowerPointFile As PowerPoint.Presentation Set PowerPointApplication = CreateObject("PowerPoint.Application") Set PowerPointFile = PowerPointApplication.Presentations.Open("PATH_TO_FILE\test.pptx") End Sub
宏在上面的Presentations.Open行上失败,出现以下错误
Run-time error '-2147467259 (80004005)': Method 'Open' of object 'Presentations' failed
我已经在电子表格的VBEditor的引用设置中启用了PowerPoint 12.0对象库。所有其他引用都与在Windows XP框上正常运行的文件完全匹配。
我在网上寻找了答案,却找不到任何东西。我阅读了一些有关Windows 7和脱机文件的信息,因此尝试将其关闭但没有帮助。
我也以管理员用户身份登录,并尝试将要打开的pptx也移动到其他目录,但没有成功。
我正在运行以下版本的Windows:
Windows 7 Professional Service Pack 1 64 Bit
任何帮助,将不胜感激!