Application.ActiveProject 属性 (Project)
获取表示活动项目的 项目 对象。 只读 项目 。
语法
expression。 ActiveProject
expression:表示 Application 对象的变量。
示例
下面的示例会向项目“属性”对话框中的“备注”字段添加日期和时间,然后保存项目。
Sub SaveAndNoteTime()
ActiveProject.ProjectNotes = ActiveProject.ProjectNotes & vbCrLf _
& "This project was last saved on " & Date$ & " at " & Time$ & "."
FileSave
End Sub
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。
反馈
https://aka.ms/ContentUserFeedback。
即将发布:在整个 2024 年,我们将逐步淘汰作为内容反馈机制的“GitHub 问题”,并将其取代为新的反馈系统。 有关详细信息,请参阅:提交和查看相关反馈