Свойство Application.ActiveProject (Project)

Получает объект Project , представляющий активный проект. Проект только для чтения.

Синтаксис

выражение. ActiveProject

выражение: переменная, представляющая объект Application.

Пример

В следующем примере в поле "Комментарии " в диалоговом окне "Свойства проекта" добавляются дата и время, а затем сохраняется проект.

Sub SaveAndNoteTime() 
 ActiveProject.ProjectNotes = ActiveProject.ProjectNotes & vbCrLf _ 
 & "This project was last saved on " & Date$ & " at " & Time$ & "." 
 FileSave 
End Sub

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.