ブックが開いた時に自動実行（Workbook_OpenとAuto_Open）

最終更新日：2013-09-09

ブックが開いた時に自動実行（Workbook_OpenとAuto_Open）

Excelブックを開いた時に自動実行させる方法として、

Workbook_OpenとAuto_Open

の２通りがあります。

Workbook_Open

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

Private Sub Workbook_Open()
　　'処理を記述
End Sub

参考：ブックを開いた時に指定シートを表示（Workbook_Open）

Auto_Open

標準モジュールに記述します。

Private Sub Auto_Open()
　　'処理を記述
End Sub

モジュール名は全て小文字（auto_open）で書いても問題ありません。

どのモジュールに記述しても問題ありませんが、

２つ以上のモジュールに記述するとエラーとなります。

Workbook_OpenとAuto_Openの実行順序

Workbook_Open
↓
Auto_Open

この順序で（Workbook_Openが先に）起動されます。

Workbook_OpenとAuto_Openの違い

他のブックのマクロVBAでブックをOpenした時には、

Workbook_Openは起動されますが、Auto_Openは起動されません。

Workbooks.Open Filename:="Book1.xls"

この場合、Book1のWorkbook_Openは実行され、Auto_Openは実行されません。

Auto_Openを実行するには

Application.Run "Book1.xls!Auto_Open"
または、
Workbooks("Book1.xls").RunAutoMacros Which:=xlAutoOpen

どちらかをWorkbooks.Openに続けて記述する必要があります。

RunAutoMacrosのWhich:=

xlAutoActivate	Auto_Activate マクロ
xlAutoClose	Auto_Close マクロ
xlAutoDeactivate	Auto_Deactivate マクロ
xlAutoOpen	Auto_Open マクロ

特段の理由がなければ、Workbook_Openのみを使用した方が良いでしょう。

同じテーマ「マクロVBA技術解説」の記事

イベント処理について
ブックが開いた時に自動実行（Workbook_OpenとAuto_Open）
ブックを閉じる時に自動実行（Workbook_BeforeCloseとAuo_Close）

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

1.ひらがな⇔カタカナの変換｜エクセル基本操作
2.最終行の取得（End,Rows.Count）｜VBA入門
3.セルのコピー&値の貼り付け（PasteSpecial）｜VBA入門
4.Range以外の指定方法（Cells,Rows,Columns）｜VBA入門
5.RangeとCellsの使い方｜ExcelマクロVBA入門
6.変数とデータ型（Dim）｜ExcelマクロVBA入門
7.マクロって何？VBAって何？｜ExcelマクロVBA入門
8.繰り返し処理（For Next)｜ExcelマクロVBA入門
9.とにかく書いて見よう（Sub,End Sub）｜VBA入門
10.セルに文字を入れるとは（Range,Value）｜VBA入門

トップ >

マクロVBA >

マクロVBA技術解説 >

ブックが開いた時に自動実行（Workbook_OpenとAuto_Open）

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

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

ExcelマクロVBA技術解説
ブックが開いた時に自動実行（Workbook_OpenとAuto_Open）