Project.Activate Method (Project)
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.
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