VBAサンプル集
ブックを開いた時に指定シートを表示(Workbook_Open)

ExcelマクロVBAの実用サンプル、エクセルVBA集と解説
最終更新日:2020-05-12

ブックを開いた時に指定シートを表示(Workbook_Open)


ブックを開いたときに自動的にマクロVBAを実行するにはWorkbook_Openを使います。
Workbook_Openは、ブックを開いた時に自動的に実行されるイベントです、


ブックを開いたときに自動的にマクロVBAを起動する方法としてはAuto_Openもあります。
ブックが開いた時に自動実行(Workbook_OpenとAuto_Open)
・Workbook_Open ・Auto_Open ・Workbook_OpenとAuto_Openの実行順序 ・Workbook_OpenとAuto_Openの違い

Workbook_Openの記述場所

イベントの基本については、以下を参照してください。
第124回.Workbookのイベントプロシージャー|VBA入門
・Workbookのイベント一覧 ・イベントプロシージャー追加のVBE操作 ・Workbook_Open:Workbookのイベント ・Workbook_BeforeClose:Workbookのイベント ・Workbook_SheetChange:Workbookのイベント

VBEの「Microsoft Excel Objects」内の「ThisWorkbook」に記述します。

マクロ VBA サンプル画像

ブックを開いた時に指定シートを表示するVBA



Private Sub Workbook_Open()
  Application.Goto Sheets(1).Range("A1"), True
End Sub

上記VBAでは、ブックが開かれると先頭シートのA1セルに移動しています。

Application.Goto

Application.Goto 参照, スクロール

参照
省略可能
移動先をのRangeオブジェクトを指定します。
Rangeオブジェクト、または、R1C1形式のセル参照を含む文字列を指定できます。

この引数を省略すると、直前にGotoメソッドを使ったときのセル範囲に移動します。

スクロール
省略可能
移動先セル範囲の左上端がウィンドウの左上端に表示されるようにウィンドウをスクロールするには、 True を指定します。
ウィンドウをスクロールしないようにするには、Falseを指定します。
既定値はFalseです。

Application.Goto Sheets(1).Range("A1"), True

これは、

Sheets(1).Select
Range("A1").Select


これと、ほぼ同じですが、

ウインドウ枠を固定していて、さらにスクロール状態で固定枠外のセルが選択されている。
このような状態でも、A1セルを選択しスクロールも戻してくれます。

VBA マクロ ブックを開いた時に指定シートを表示

上の動画では当初I17が選択されていて、
Application.Goto Sheets(1).Range("A1"), True
これにより、スクロールが戻されA1が選択されています。



同じテーマ「マクロVBAサンプル集」の記事

ブックを開いた時に指定シートを表示(Workbook_Open)
ブックが閉じられる直前に保存済を確認(Workbook_BeforeClose)
シートが選択された時に指定セルに移動(Worksheet_Activate)
ダブルクリックで行高・列幅調整(Worksheet_BeforeDoubleClick)
英小文字が入力されたら大文字に変換(Worksheet_Change)
セル選択で選択行の色を変更(Worksheet_SelectionChange)
方眼紙Excel(神エクセル)に対応するVBA


新着記事NEW ・・・新着記事一覧を見る

シート関数のCOUNTIFS,SUMIFS,MAXIFSと同じ処理|Power Query(M言語)入門(2023-02-28)
新旧マスタの差異比較|Power Query(M言語)入門(2023-02-28)
有効な最新単価の取得|Power Query(M言語)入門(2023-02-26)
有効な最新単価の取得|Power Query(M言語)入門(2023-02-21)
グルーブ内の最小・最大|Power Query(M言語)入門(2023-02-17)
2つのテーブルのマージ|Power Query(M言語)入門(2023-02-15)
「売上」が数値の行のみ取り込む|Power Query(M言語)入門(2023-02-13)
A列のヘッダー名を変更する|Power Query(M言語)入門(2023-02-11)
CSVのA列が日付の行だけを取り込む|Power Query(M言語)入門(2023-02-10)
列数不定のCSVの取り込み|Power Query(M言語)入門(2023-02-09)


アクセスランキング ・・・ ランキング一覧を見る

1.最終行の取得(End,Rows.Count)|VBA入門
2.RangeとCellsの使い方|VBA入門
3.変数宣言のDimとデータ型|VBA入門
4.繰り返し処理(For Next)|VBA入門
5.セルのコピー&値の貼り付け(PasteSpecial)|VBA入門
6.マクロって何?VBAって何?|VBA入門
7.並べ替え(Sort)|VBA入門
8.エクセルVBAでのシート指定方法|VBA技術解説
9.Range以外の指定方法(Cells,Rows,Columns)|VBA入門
10.ブックを閉じる・保存(Close,Save,SaveAs)|VBA入門




このサイトがお役に立ちましたら「シェア」「Bookmark」をお願いいたします。


記述には細心の注意をしたつもりですが、
間違いやご指摘がありましたら、「お問い合わせ」からお知らせいただけると幸いです。
掲載のVBAコードは動作を保証するものではなく、あくまでVBA学習のサンプルとして掲載しています。
掲載のVBAコードは自己責任でご使用ください。万一データ破損等の損害が発生しても責任は負いません。



このサイトがお役に立ちましたら「シェア」「Bookmark」をお願いいたします。
本文下部へ