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

関連記事

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

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

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

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

: 背景に画像を表示（SetBackgroundPicture メソッド）

SetBackgroundPicture メソッド SetBackgroundP …

: ブックを開く（Open メソッド）

ブックを開く（Open メソッド）ブックを開くには、Workbooks コレク …

: 簡易印刷（PageSetup.Draft プロパティ）

PageSetup.Draft プロパティ PageSetup.Draft プロ …

: 0 を表示するかどうかを設定（DisplayZeros プロパティ）

DisplayZeros プロパティ DisplayZeros プロパティに、T …

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

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

: ワークシートを参照する（Sheets プロパティ）

Sheets プロパティ Sheets プロパティは、Sheets コレクション …

: ファイル保存の既定の形式を取得・設定（DefaultSaveFormat プロパティ）

DefaultSaveFormat プロパティ DefaultSaveForma …

: 別のブックのマクロを実行（Run メソッド）

別のブックのマクロを実行別のブックのマクロを実行するには、Run メソッドを …

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