Excel（エクセル）のマクロ・ＶＢＡ・関数・操作などのメモ

ワークシートをアクティブにする・選択する（Activate, Select）

2015/08/04 2015/10/20

Activate メソッド・Select メソッド

Activate メソッドは、指定したワークシートをアクティブにします。Select メソッドは、指定したワークシートを選択します。

【書式：ワークシートをアクティブにする】

object.Activate

【書式：ワークシートを選択する】

object.Select ( replace )

項目の説明

object ・・・対象となる Worksheet オブジェクトを指定します。
replace ・・・ True を指定すると、指定したオブジェクトのみを選択します。False を指定すると現在選択されているオブジェクトに加えて、指定したオブジェクトを選択します。既定値は、True です。省略可。

複数のワークシートを一度に選択
Array 関数（Array 関数（バリアント型の配列を作成）参照）を使用します。
　（例）左から１番目、２番目のシートを選択
　　　　Worksheets( Array( 1, 2 ) ).Select
　（例）シート名が「Sheet1」「Sheet3」を選択
　　　　Worksheets( Array( “Sheet1”, “Sheet3” ) ).Select

ワークシートをアクティブにする・選択する使用例

サンプルVBAソース

　
Sub Sample_WShtActivateSelect()


    '（1）全シートを選択
    Sheets.Select
    
    '（2）2 番めのシートのみを選択
    Worksheets(2).Select
    
    '（3）「Sheet1」を追加で選択
    Sheets("Sheet1").Select False

    '（4）「Sheet1」をアクティブにする
    Worksheets("Sheet1").Activate


End Sub

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

　

Sub Sample_WShtActivateSelect()

'（1）全シートを選択

Sheets.Select

'（2）2 番めのシートのみを選択

Worksheets(2).Select

'（3）「Sheet1」を追加で選択

Sheets("Sheet1").Select False

'（4）「Sheet1」をアクティブにする

Worksheets("Sheet1").Activate

End Sub

　

実行結果

（1）全シートを選択

（2）2 番めのシートのみを選択

（3）「Sheet1」を追加で選択

（4）「Sheet1」をアクティブにする

- ブック・シートの操作 Activate メソッド, Select メソッド, VBA基本, Worksheet オブジェクト, エクセルVBA, ブック・シートの操作

Tweet

Message コメントをキャンセル

このサイトはスパムを低減するために Akismet を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

: 印刷設定（偶数ページのヘッダー・フッターを設定）OddAndEvenPagesHeaderFooter, EvenPage

偶数ページに別のヘッダーおよびフッターを設定偶数ページのヘッダーおよびフッター …

: ブックが互換モードで開いているか確認する（Excel8CompatibilityMode プロパティ）

ブックが互換モードで開いているか確認する Excel8Compatibility …

: 新規ブック作成（Add メソッド）

新規にワークブックを作成する Workbooks コレクションの Add メソッ …

: ワークシートの追加・削除（Add メソッド・Delete メソッド）

新しいワークシートを作成 Add メソッドで、新しいワークシートを指定した場所に …

: ウィンドウの位置を入れ替える（ActivatePrevious メソッド、ActivateNext メソッド）

ウィンドウの位置を入れ替える ActivatePrevious メソッド、Act …

: スクロールバーの表示・非表示（DisplayHorizontalScrollBar,DisplayVerticalScrollBar）

スクロールバーの表示・非表示の設定 Windows オブジェクトの Displ …

: 印刷実行前に総ページ数を取得（ExecuteExcel4Macro メソッド）

印刷の総ページ数を取得（ExecuteExcel4Macro メソッド） Exc …

: 印刷時の改ページ設定（Add,ResetAllPageBreaks）

改ページの追加と解除印刷時に改ページを指定するには、HPageBreaks コ …

: ワークシートをファイルに保存する（SaveAs メソッド）

SaveAs メソッドワークシートを名前を付けてファイルに保存します。Work …

: ブックを別名で保存（SaveAs メソッド）

ブックを別名で保存（SaveAs メソッド）ブックの変更を保存したり、新規ブッ …

PREV: セル内部を参照（Interior プロパティ）
NEXT: フリガナ（Phonetic プロパティ）