アクティブシートとは

excel vbaの初心者です。
アクティブシートについて聞きます。
(1)マクロ実行中、ある時点では、アクティブシートはひとつだけですか、それとも
複数のシートがアクティブになっているということもありますか。
(2)今アクティブなものはどれかデバッグなどで認識することできますか。
(3)処理で次次に別のシートをアクティブにした場合、前のシートはアクティブでならなくなうのでしょうか。
以上宜しくお願いします。

No.1 ベストアンサー 回答者： ham_kamo 回答日時： 2007/01/16 11:21

(1)ActiveSheetは１つです。

VBAでは、複数あるものはコレクションオブジェクトといって、オブジェクトの集合体を表す１つのオブジェクトとして扱われます。WorkbooksとかWorksheetsとかがそうです。Worksheetsはそのブックのシート全体のコレクションで、単体のシートを指定するにはWorksheets("Sheet1")などと表記します。
ActiveSheetはコレクションオブジェクトでなく、単体のシートを指すので、常に１つだけです。

(2)デバッグ中にActiveSheetを確認したいときは、ステップ実行やブレークポイントで処理を中断させ、「デバッグ」＞「ウォッチ式の追加」で「ActiveSheet.Name」を追加すれば、ウォッチウィンドウでシート名を確認することができます。

(3)ActiveSheetは１つなので、別のシートをアクティブにしたら、前のシートはアクティブではありません。

この回答へのお礼

事実が明確に認識できたことに感謝します。ご回答どうもありがとうございました。

お礼日時：2007/01/16 11:33

No.4 回答者： imogasi 回答日時： 2007/01/16 20:38

ThisWorkbookのSheetActivateイベント

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
MsgBox Sh.Name
End Sub
これはブック単位でしか反応しないようだか。
選択はシートタブで２つ以上できて、だから２つあるように見えるが
や
「ウインドウー新しいウインドウうを開く」で色々やって見たが
、片方はウインドウ的なコピーで、見た目は２つ有るように見えるが
「アクチブシートは（その時点で）１つ」でよいのではないでしょうか。
Sub test01()
ActiveSheet.Cells(1, "A") = "AAA"
End Sub
新しいウインドウを開いていたときはコピーなので、両方にセットされるように見えるが、アクチブシートが２つではないでしょう。
普通に使っているときは、この考えで少なくても困りません。
シートを２つ以上指定したりしてやってみたが、シートタブでマウスでクリックしたシートですね。キーボ－ドやマウスで入力できるシート
ですね。キーやマウス以外で、VBAでやると
VBAでは
Sub test02()
Worksheets("Sheet1").Activate
Worksheets("Sheet3").Range("A3") = "DDDDDDDD"
End Sub
が可能(アクチブシート以外に値をセットできる）ですから、余りActivateに拘らなくても（むしろ拘らないで明示的に指定したほうが）良いのでは。

この回答へのお礼

余りActivateに拘らなくても（むしろ拘らないで明示的に指定したほうが）良いのでは。
は特に参考になりました。

更に理解を深めることができました。ご回答どうもありがとうございました。

お礼日時：2007/01/31 09:10

No.3 回答者： ham_kamo 回答日時： 2007/01/16 11:57

No.1です。

すみません、No.2さんの回答を読んで、ブックを2つ以上開いていた場合のことが抜けていたことに気がつきました。No.1の回答は、「開いているブックが１つのとき」に限定しての解説だとご理解ください。

No.2 回答者： siddhaartha 回答日時： 2007/01/16 11:41

(1)ActiveSheetプロパティはApplication/Workbook/Windowオブジェクトのメンバなので

　　Excelを複数起動している場合や複数ワークブックを開いている場合、ウィンドウを
　　複数開いている場合は、対象のオブジェクトによってActiveSheetの値は異なります。
　　なので(1)の答えとしては複数のAcvtiveSheetは存在しえます。

(2)可能です。Debug.print などでActiveSheet.nameなどを出すなど方法はあります。

(3)上記(1)で説明したように、上位オブジェクトによってActiveSheetの値は変わるので
　　条件によっては複数ActiveSheetが存在し得ますが、同一オブジェクト内では
　　ActiveSheetは１つなので、別のシートをアクティブにすれば前回のActiveSheetは
　　アクティブでなくなります。ただし、別のオブジェクトには影響しません。

簡単に説明するならば・・・エクスプローラーを２つ開くとします（窓A、窓B）。
エクスプローラー上で開いているフォルダをアクティブフォルダと考えれば
アクティブシートの関係と似たような関係になると思っておいてください。

アクティブフォルダは窓A、Bによってそれそれ存在する。・・・(1)
窓Aでフォルダを移動すれば前のアクティブフォルダはアクティブではなくなる。
しかし、窓Bのアクティブフォルダは変わらない・・・(3)