vba - Project Server 2013 文件保存无提示

Question

我正在尝试保存之前在 Project Server 2013 上打开的文件。我对文件所做的唯一更新是设置状态日期并移动未完成的任务。我在 excel VBA 中运行该文件。我可以分享完整的代码集，但我认为没有必要。如果我在不保存文件的情况下运行宏，一切都会完美运行。我需要做的就是在不提示我的情况下保存文件，然后我就完成了。感谢所有帮助。

Dim appPJ As MSProject.application

Set appPJ = New MSProject.application

appPJ.FileOpenEx Name:="<>\" & strFileName, ReadOnly:=False, Noauto:=True, IgnoreReadOnlyRecommended:=True, DoNotLoadFromEnterprise:=False

'Update the status date and move unfinished tasks to the future

appPJ.ProjectSummaryInfo StatusDate:=dateStatusDate

appPJ.UpdateProject All:=True, UpdateDate:=dateStatusDate, Action:=2

'Call the various read data only report routines

appPJ.DisplayAlerts = False

appPJ.FileCloseEx pjSave, True, True

上面的行不会通过提示保存到服务器。