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

関連記事

: ユーザー設定のビュー（CustomView オブジェクト）

ユーザー設定のビュー CustomView オブジェクトは、登録されている各ビュ …

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

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

: ブックが共有モードか確認する（MultiUserEditing プロパティ）

ブックが共有モードか確認する（MultiUserEditing プロパティ）共 …

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

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

: 分割したウィンドウの取得（Panes コレクション,Pane オブジェクト）

分割したウィンドウ「ウィンドウ枠の固定」や「ウィンドウの分割」での、すべての領 …

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

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

: ブックを保存する（Save メソッド）

ブックを保存する（Save メソッド）既存のブックを上書き保存するには、Sav …

: 印刷時、シート内のエラーをどう扱うかを設定（PrintErrors プロパティ）

PageSetup.PrintErrors プロパティ PageSetup.Pr …

: 選択されているシートを参照する（SelectedSheets プロパティ）

SelectedSheets プロパティ選択されているすべてのシートをあらわす …

: 印刷：余白を設定 TopMargin,BottomMargin,LeftMargin,RightMargin,HeaderMargin,FooterMargin

余白を設定する余白を設定する単位は、pt（ポイント：約 0.03528 cm） …

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