ブックをアクティブにする

開かれているブックの中で指定のブックをアクティブにするにはWorkbookオブジェクトの「Activate」メソッドを使います。ここでは Excel VBA でブックをアクティブにする方法について解説します。

(Last modified: 2023年07月10日)

ブックをアクティブにする

ブックをアクティブにするに次のように記述します。

Dim book1 As Workbook

Set book1 = Application.Workbooks(1)
book1.Activate

まとめて次のように記述しても構いません。

Workbooks(1).Activate

サンプルプログラム

では簡単なサンプルで試してみましょう。実行するマクロは「VBAsample.xls」と言う名前のブックに含まれています。

Sub テスト()
    
    Workbooks.Open "C:¥excelsample¥2005年成績.xls"
    Workbooks.Open "C:¥excelsample¥2006年成績.xls"

    Workbooks("2005年成績.xls").Activate
    
End Sub

上記マクロを実行すると次のようになります。

今回は「2005年成績.xls」と「2006年成績.xls」という2つのブックを開いた後で、「2005年成績.xls」ブックの方をアクティブに設定しています。

-- --

Excel VBA でブックをアクティブにする方法について解説しました。

著者 / TATSUO IKURA

プログラミングや開発環境構築の解説サイトを運営しています。