VBA 代码绕过对话框答案

【问题标题】：VBA Code to Bypass Dialog BoxVBA 代码绕过对话框
【发布时间】：2016-04-12 23:19:05
【问题描述】：

我在 VBA 中有一些代码可以打开一个 Microsoft Project 文件，提取一些数据，然后关闭该文件。不幸的是，我添加了一些指向项目文件的链接，现在打开它时会弹出一些启动画面。我正在尝试编辑我的代码，以便代码为运行宏的用户关闭启动画面，以便他们看不到或不必响应它们，并且宏会自动继续执行该过程。

这是当前编写方式的代码（FileToOpen 设置为文件位置）

'Open the MSProject file
        Set mpApp = New MSProject.Application
        mpApp.Visible = True
        AppActivate "Microsoft Project"
        mpApp.FileOpen FileToOpen

然后它收集数据并关闭文件

'Close Project and select Excel as running program
    mpApp.FileClose pjDoNotSave
    mpApp.Quit
    Set mpApp = Nothing

我需要浏览一些启动画面，在此处单击“确定”或“取消”：

在此处单击“关闭”（并非所有其他选项可能总是灰显）：

任何帮助将不胜感激！

谢谢！

【问题讨论】：

标签： vba excel dialog ms-project

【解决方案1】：

我会试试this：

mpApp.FileOpen Name:=file_location_and_name, ReadOnly:=True, openPool:=pjDoNotOpenPool

这是我搜索的查询：打开资源池信息对话框 vba。 如果在您应用第一次修复后问题仍然存在，我会尝试对另一个对话框进行相同的搜索。

HTH

【讨论】：

谢谢！！这帮助很大。我能够为资源池执行此操作，但最终不得不更改 Project 中的文件，以便在打开文件时不会打开对话框，因为我找不到如何自动化该对话框。
很高兴您能正常使用。感谢您的反馈。 @sfowler38