Project.Index プロパティ (Project)
プロジェクト のコレクションが含まれる プロジェクト のオブジェクトのインデックスを取得します。 読み取り専用のバリアント型 (Variant) の値。
構文
式。インデックス
式Project オブジェクトを表す変数。
例
開いたプロジェクトごとに、 Windows コレクションのインデックスが同じで、[ガント チャート] ビューを配置する場合は、1 つのプロジェクトでガント チャートを表示し、 ActivateSameWindowInNextProject マクロを使用して、他の開いているプロジェクトのガント チャートに簡単に切り替える。
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
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。