Edit

Share via

Project.Index property (Project)

  • Article

Gets the index of a Project object in the containing Projects collection. Read-only Variant.

Syntax

expression.Index

expression A variable that represents a Project object.

Example

If you put a Gantt chart in the same index of the Windows collection for every open project, you can display a Gantt chart in one project and then use the ActivateSameWindowInNextProject macro to easily switch to the Gantt charts of the other open projects.

Sub ActivateSameWindowInNextProject() 
 
 ' Check for a next project. 
 If ActiveProject.Index = Application.Projects.Count Then 
 MsgBox("No more open projects") 
 ' Check for an equivalent window in the next project. 
 ElseIf ActiveProject.Windows.ActiveWindow.Index > Projects(ActiveProject.Index + 1).Windows.Count Then 
 MsgBox("No equivalent window in the next project") 
 ' If everything's okay, switch to the window in the next project. 
 Else 
 Projects(ActiveProject.Index + 1).Windows(ActiveWindow.Index).Activate 
 End If 
 
End Sub

Support and feedback

Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.