1

この VBS は、PowerPoint 2010、2003 で正常に動作します。

Set pptApp = CreateObject("Powerpoint.Application")
pptApp.Visible = True
pptApp.WindowState = 2
Set ppt = pptApp.Presentations.Open("c:\temp\test.pptx")

ただし、PowerPoint 2013 には最後の行に問題があります。

Unspecified error
4

1 に答える 1

-1

このエラーは、一部の権限が不足している場合に発生します。このファイルのプロパティ->セキュリティで確認してください。

また、Microsoft は VBA の代わりに Visual Studio for Applications を使用する方向に進んでおり、VBA は推奨されなくなりました。

于 2013-02-13T15:57:32.693 に答える