エクセルブックのアクティブ化は大切。あるあるミスと記述

エクセルVBAでブックのアクティブ化はActivateメソッドを使います。
簡単なことですが、怠ると大変な結果を招くこともあります。
ミス例と記述方法を紹介します。

こんにちは、じゅんぱ店長（@junpa33）です。

エクセルブックをアクティブにするには「Activateメソッド」を使用します。

VBAコードでブック、シート、セルを操作・編集するためには、前提として操作する対象がアクティブになっている必要があります。

ブックをアクティブにすることは、VBAコード処理の前提条件ともなりますので、しっかり押さえておく必要があります。

コンテンツ

ブックをアクティブにしなければ・・・

一例として次のような状況を考えてみます。

エクセルブック「Book1.xlsm」のModule1に次のマクロを設置します。

エクセルブック「Book1.xlsm」をクリックで開いて、そのModule1にVBAコードを書き出しているのですから、当然、操作される主体は「Book1.xlsm」であると ” 思い込んで ” しまうかもしれません。

VBA

Sub ブックをアクティブ1()
        Worksheets("Sheet1").Range("B3").Copy _
                Workbooks("Book2.xlsm").Worksheets("Sheet1").Range("D5")
End Sub

Book1.xlsmの「Sheet1」の「セルB3」に「あいうえお」、Book2.xlsmの「Sheet1」の「セルB3」に「アイウエオ」と入力しておきます。

マクロを実行した期待値としては、” エクセルブック「Book2.xlsm」の「Sheet1」の「セルD5」に「あいうえお」が入力される。” ことです。

マクロを実行すると、

結果として「アイウエオ」が入力されてしまいました。

VBAコードの書き出しの「Worksheets(“Sheet1”).Range(“B3”)」は、「” アクティブブック ” のSheet1のセルB3」という意味です。

原因としては、マクロ実行前に「Book2.xlsm」の「セルB3」に「アイウエオ」と、セル入力したために、アクティブブックが変更され、コピー元の「Sheet1」を「Book1.xlsm」でなく「Book2.xlsm」の方で参照されたため、ということです。

なので、正しく修正したVBAコードは、Workbooks(“Book1.xlsm”).Activate を追加記述します。

VBA

Sub ブックをアクティブ2()
        Workbooks("Book1.xlsm").Activate
        Worksheets("Sheet1").Range("B3").Copy _
                Workbooks("Book2.xlsm").Worksheets("Sheet1").Range("D5")
End Sub

また、VBAコードの他の記述方法として、

VBA

Sub ブックをアクティブ3()
        Workbooks("Book1.xlsm").Worksheets("Sheet1").Range("B3").Copy _
                Workbooks("Book2.xlsm").Worksheets("Sheet1").Range("D5")
End Sub

でもOKです。

アクティブな状態は常に移り気なので、シートやセルを指定するときは「何処の何方さんのブック」かをいつも表現できているようにしましょう。

たくさんコードを書いていて、書き疲れで”やらかしてしまう”凡ミスのあるあるです。

目次へ戻る

ブックのActivateの記述方法

ブックをアクティブにする記述法はこのようになります。

Activateの構文

ブックオブジェクト.Activate

記述法を一覧にすると・・・

Workbooks(“Book1.xlsm”).Activate	ブック名を指定してアクティブ化（拡張子を付けるのを忘れないで！）
Workbooks(1).Activate	インデックス番号を指定してアクティブ化します。
MyWb.Activate	オブジェクト変数を使ってアクティブ化（Setステートメントで変数化”MyWb”）
Workbooks(“Book1”).Activate	例外で、新規作成したブックを名前を付けて保存前にアクティブ化する場合
ActiveWorkbook	現在アクティブ化しているブックを指定する場合に使います。
ThisWorkbook.Activate	マクロ（VBAコード）を実行しているブックをアクティブ化する。