ExcelVBA入門 - ブックを開いたときに、自動でユーザーフォームが開かれるようにするには？

ブックを開いたときに、自動で．．．？

ブックを開いたときに、自動でユーザーフォームが開かれるようにするには？

ワークシートに作ったコマンドボタンをクリックすると
ユーザーフォームが開くようにしていた．．．でも、いつもユーザーフォームをすぐ使いたい！

『ブックを開いたと同時に、自動でユーザーフォームが開くようにしたい！』

２つの方法が見つかった。
1．標準モジュールに「Auto_Open()」を書く

Sub Auto_Open()
　　UserForm1.Show
End Sub

ブックを開いたと同時に、ユーザーフォーム（UserForm1）が開きました。

2．ThisWorkbook モジュールに「Workbook_Open()」を書く

Private Sub Workbook_Open()
　　UserForm1.Show
End Sub

ブックを開いたと同時に、ユーザーフォーム（UserForm1）が開きました。

Auto_Open()とWorkbook_Open()．．．
こんなプログラムを書いてみました。
標準モジュールに

Sub Auto_Open()
　　MsgBox "Auto_Openが動作してます。"
End Sub

ThisWorkbook モジュールに

Private Sub Workbook_Open()
　　MsgBox "Workbook_Openが動作してます。"
End Sub

保存して、ブックを閉じる。そして、ブックを開くと
Workbook_Open起動

ThisWorkbook モジュールに書いたWorkbook_Open()が実行されました。
OKをクリックして、メッセージボックスを閉じると今度は、
Auto_Open起動

標準モジュールに書いたAuto_Open()が実行されました。
Workbook_Openのほうが先に実行されて、Auto_Openが後に来るようです。

2006年7月

ホーム > VBAこんなとき？ > Lesson1： ブックを開いたときに、自動で．．．？