Project.Activate Method (Project)

Activates the project.

expression .Activate

expression A variable that represents a Project object.

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
Show:
© 2014 Microsoft