Событие Project.Open (Project)

Статья
04/07/2023

Происходит при открытии проекта, но до события Activate .

Синтаксис

expression. Открыть (pj)

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

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
Pj	Обязательный	Проект	Открытый проект.

Возвращаемое значение

Nothing

Замечания

События проекта не возникают, когда проект внедрен в другой документ или приложение.

Пример

В этом примере при открытии проекта в поле Примечания проекта добавляется псевдоним электронной почты пользователя и текущая дата. Размещение этого примера в событии Open проекта предоставляет простой журнал доступа к файлу.

Private Sub Project_Open(ByVal pj As MSProject.Project) 
    Dim Alias As String 
 
    Alias = InputBox$("Please enter your email alias: ") 
    pj.ProjectSummaryTask.AppendNotes vbCrLf & "Opened by " & Alias & _
        " on " & Date$ & "." 
End Sub

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

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

Поделиться через