Project Server 2013文件保存没有提示

时间:2015-07-06 16:29:31

标签: vba server project

我正在尝试保存之前在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

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

0 个答案:

没有答案