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 を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

: ブックを参照（Workbooks プロパティ,Windows プロパティ）

アクティブなワークブックを参照現在使用中のワークブック、複数ある場合は一番手前 …

: 印刷・印刷プレビュー（PrintOut メソッド、PrintPreview メソッド）

PrintOut メソッド印刷するには、PrintOut メソッドを使用しま …

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

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

: Excel を全画面表示（DisplayFullScreen プロパティ）

DisplayFullScreen プロパティ DisplayFullScree …

: ブック作成時のシート数の取得・設定（SheetsInNewWorkbook プロパティ）

SheetsInNewWorkbook プロパティ Excel で新規ブックに自 …

: ワークシートにクリップボードの内容を貼り付ける（Paste メソッド）

Paste メソッド指定したワークシート上にクリップボードのデータを貼り付けま …

: アウトライン記号の表示・非表示（DisplayOutline プロパティ）

アウトライン記号の表示・非表示（DisplayOutline プロパティ） Di …

: 行列番号を含めて印刷（PageSetup.PrintHeadings プロパティ）

PageSetup.PrintHeadings プロパティ PageSetup. …

: 保存時にバックアップファイルが作成されるかどうかを確認（CreateBackup プロパティ）

バックアップファイルが作成されるかどうかを確認 CreateBackup プロパ …

: ページ数に合わせて印刷（FitToPagesTall, FitToPagesWide）

PageSetup.FitToPagesTall プロパティ PageSetup …

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