Project.Open Event (Project)

Occurs when the project opens, but before the Activate event.

expression .Open(pj, )

expression A variable that represents a Project object.

Parameters

Name

Required/Optional

Data Type

Description

pj

Required

Project

The project that was opened.

Return Value

nothing

Project events do not occur when the project is embedded in another document or application.

This example adds the user's email alias and the current date to the project Comments field whenever the project is opened. Placing this example in the Open event of a project provides a simple access history for the file.

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