VBA 项目 - 等待 ExecuteMso( "StatusDate" ) 返回数据

Question

我正在运行一个需要状态日期的宏。我正在使用ActiveProject.CommandBars.ExecuteMso ("StatusDate")，在我设置 Project 2016 的状态日期之前，宏会继续执行。如何编码等待输入日期？

Answer 1

我可以看到使用该命令是多么实用，但是您已经发现了后果。

如果您准备再次单击设置状态日期，您可以在命令后添加一个虚拟 MsgBox 对话框：

ActiveProject.CommandBars.ExecuteMso ("StatusDate")
MsgBox "Status Date set"

。或者你同时找到了另一个解决方案？