HOME > 即効テクニック > Excel VBA > シート操作関連のテクニック > アクティブシートを参照する(ActiveSheetプロパティ)

即効テクニック
シート操作関連のテクニック

アクティブシートを参照する(ActiveSheetプロパティ)

(Excel 2000)
指定したウィンドウ、ブックのアクティブシートを参照します。Objectを省略した場合には、アクティブブックのアクティブシートを参照します。

構文  Object.ActiveSheet     取得のみ


設定項目           内容
  Object           Application,Window,Workbookオブジェクト [省略可能]

次のサンプルは、アクティブシートの種類を判別するものです。(1)のステートメントに注目してください。
●サンプル● 
Sub ActiveSheetSamp1()

    Dim i As Byte

    For i = 1 To Sheets.Count         '---各シートに対して
        Sheets(i).Activate            '---アクティブにする
        MsgBox TypeName(ActiveSheet)  '---(1)アクティブシートの種類を表示
    Next i

End Sub

TypeName関数はオブジェクトの名前を返します。アクティブシートがワークシートなのか、グラフシートなのかを判別したいときなどに使うと便利です。
ビジネス統計スペシャリスト VBAエキスパート