Свойство 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 и обратная связь.