ExcelマクロVBA入門
第27回.ブック・シートの選択(Select,Activate)

Excelマクロの基礎と応用、エクセルVBAの入門・初級・初心者向け解説
最終更新日:2019-06-30

第27回.ブック・シートの選択(Select,Activate)


エクセルでは、複数ブックを扱います、
そして、それぞれのブックには、複数のシートが存在します。
従って、マクロVBAでも複数ブック・複数シートを扱う必要があります。


ここまでのVBAでは、あくまでアクティブブックのアクティブシートを対象としてきました。
そこで、フクティブブックやアクティブシートを切り替えるVBAについて解説します。
まず説明しなければならない事は、 「アクティブ」という言葉の意味からになります。

アクティブ

アクティブブック、アクティブシート、アクティブセル
これらは何を指しているかです。
今まさに操作対象となっていると言う事です。
文字を打ち、Enterを押したときに、入力される、ブックのシートのセル
それが、アクティブブックのアクティブシートのアクティブセルです。

単に選択している状態とは違います

選択は複数できます、Ctrlを押しながら選択したり、Shiftを押しながら選択すれば、
複数の選択が可能です。
従って、「選択」は複数ありますが、「アクティブ」は常に1つです。

マクロVBA ブック シート

この場合、選択シートは、Sheet1とSheet2ですが、
アクティブシートは、Sheet1になります。


ブックは複数選択は出来ません。
アクティブブックが唯一存在するだけです。

ActiveWorkbook
マクロにおいて、アクティブブックを指定する場合の書き方です。
ActiveSheet
マクロにおいて、アクティブシートを指定する場合の書き方です。

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

マクロVBAで指定ブックをアクティブにするには、
Workbooks("ブック名").Activate
このように記述します。
ブック名には、拡張子(.xls、.xlsx、.xlsm)も指定する必要があります

マクロの記録ですと、
Windows("ブック名").Activate
このように記録されます。

上記、2つは、1つのブックに対し複数のウインドウを開いている時に違いが発生します。
本来は、Windows("ウインドウ名")なのですが、
ブックに対し1つしかウインドウが存在しない場合は、
ウインドウ名 = ブック名
となっているということになります。

シートの選択、シートのアクティブ

シートの選択
マクロVBAで指定シートを選択にするには、
Sheets("シート名").Select
または、
Sheets(インデックス).Select

インデックスは、シートの順番の数値です、詳細は後々。
非表示シートが無ければ、一番左のシートから順に、1,2,3・・・となります。
ワークシートしかなければ、SheetsをWorkSheetsでも同じです。
シートをアクティブにする
マクロVBAで指定シートを選択にするには、
Sheets("シート名").Activate
または、
Sheets(インデックス).Activate

Actovateでも、シートが選択されます。
では、

Sheets("シート名").SelectとSheets("シート名").Activateの違いは、
1つしかシートを選択にしない場合は、全く同じ事です。
どちらで書いても良いでしょう。
複数シートを選択(作業グループ化)している場合に違いが出てきます。
一つのシートだけ選択している場合
選択シート = アクティブシート
SelectでもActivateでも同じ動作となります。
複数シートを選択している場合
Selectでは、
指定シートのみ選択状態になり、指定シートがアクティブになります。

Activateでは、
選択されているシートはそのままで、指定シートがアクティブになります。

複数シートの選択(作業グループ化)

Sheets(Array("シート名1", "シート名2", ・・・)).Select
これで、複数シートが選択されます。

Arrayは配列です、これについては後々
そして、この状態で、
Sheets("シート名2").Activate

この場合においては、シートの複数選択がそのままで、 アクティブシートのみ移動されます。
しかし、この状態で、
Sheets("シート名2").Select
とした場合は、作業グループが解除され、 シート名2が選択され、アクティブになります。

ただし、マクロにおいて、シートを作業グループ化しての操作は行いません。
行いませんと言うより、行わない方が良いです。

マクロで複数のシートに同じ処理をする場合は、
作業グループではなく、繰り返し処理で、複数のシートに同じ処理を行う方が良いということです。
全てのシートに同じ事をする(For~Worksheets.Count)
エクセルの作業で最も面倒かつ時間のかかる作業は同じ作業の繰り返しでしょう1回だけなら数秒でもそれを何十回と繰り返すとなると… 多くのシートがあり同じ作業を全シートに行うとなると…マクロの出番です。シートの指定方法はWorksheets(_シート名_) Worksheets(インデックス) ActiveSheet この3通りを紹介しました。

複数ブックを開いている時のシート選択

Sheets("シート名").Select
これで選択できるのは、アクティブブックのシートだけです。
アクティブブック以外のシートを選択する場合は、
そのブックをアクティブにしてから、シートのSelectメソッドを実行します。

Book2.xlsxが非アクティブの時、Book2.xlsxのSheet2を選択する場合は、
Workbooks("Book2.xlsx").Activate
Sheets("Sheet2").Select

このように、ブック→シートの順にアクティブにします。

ただし、Activateメソッドを使って1行で書くこともできます。
Workbooks("Book2.xlsx").Sheets("Sheet2").Activate
これでも、Book2のSheet2を選択状態にできます。
特に1行で書く理由もないので、あまり使われていないかもしれません。



同じテーマ「マクロVBA入門」の記事

第24回.インプットボックス(InputBox関数)
第25回.名前付き引数について
第26回.総合練習問題2
第27回.ブック・シートの選択(Select,Activate)
第28回.セル・行・列の選択(Select,Activate)
第29回.セル・行・列の削除・挿入(Delete,Insert)
第30回.総合練習問題3
第31回.セルの書式(表示形式,NumberFormatLocal)
第32回.セルの書式(配置,Alignment)
第33回.セルの書式(フォント,Font)
第34回.セルの書式(塗りつぶし,Interior)


新着記事NEW ・・・新着記事一覧を見る

Byte配列と文字コード関数について|VBA技術解説(8月20日)
PowerQueryの強力な機能をVBAから利用する方法|VBA技術解説(8月4日)
練習問題31(セル結合を解除して値を埋める)|VBA練習問題(7月30日)
練習問題30(マトリックス→リスト形式)|VBA練習問題(7月25日)
Applicationを省略できるApplicationのメソッド・プロパティ一覧|VBA技術解説(7月22日)
コレクション(Collection)の並べ替え(Sort)に対応するクラス|VBA技術解説(7月20日)
CSVの読み込み方法(ジャグ配列)|VBAサンプル集(7月15日)
その他のExcel機能(グループ化、重複の削除、オートフィル等)|VBA入門(7月14日)
オートフィルタ退避回復クラスを複数シート対応させるVBAクラス|VBA技術解説(7月6日)
オートフィルタを退避回復するVBAクラス|VBA技術解説(7月6日)


アクセスランキング ・・・ ランキング一覧を見る

1.最終行の取得(End,Rows.Count)|VBA入門
2.セルのコピー&値の貼り付け(PasteSpecial)|VBA入門
3.RangeとCellsの使い方|ExcelマクロVBA入門
4.Range以外の指定方法(Cells,Rows,Columns)|VBA入門
5.変数とデータ型(Dim)|ExcelマクロVBA入門
6.繰り返し処理(For Next)|ExcelマクロVBA入門
7.マクロって何?VBAって何?|ExcelマクロVBA入門
8.セルに文字を入れるとは(Range,Value)|VBA入門
9.ひらがな⇔カタカナの変換|エクセル基本操作
10.空白セルを正しく判定する方法(IsEmpty,IsError,HasFormula)|VBA技術解説



  • >
  • >
  • >
  • ブック・シートの選択(Select,Activate)

  • このサイトがお役に立ちましたら「シェア」「Bookmark」をお願いいたします。


    記述には細心の注意をしたつもりですが、
    間違いやご指摘がありましたら、「お問い合わせ」からお知らせいただけると幸いです。
    なお、掲載のVBAコードは自己責任で使ってください。万一データ破損等の損害が発生しても責任は負いません。




    このサイトがお役に立ちましたら「シェア」「Bookmark」をお願いいたします。
    本文下部へ