Project.Activate Method (Project)

Office 2010

Other Versions

Office 2013 and later

Activates the project.

Syntax

expression .Activate

expression A variable that represents a Project object.

Example

The following examples activate the next and previous projects, respectively.

VBA

Sub ProjectNext() 
 If ActiveProject.Index < Projects.Count Then 
 Projects(ActiveProject.Index + 1).Activate 
 Else 
 Projects(1).Activate 
 End If 
End Sub 
 
Sub ProjectPrevious() 
 If ActiveProject.Index > 1 Then 
 Projects(ActiveProject.Index - 1).Activate 
 Else 
 Projects(Projects.Count).Activate 
 End If 
End Sub