HOME > 即効テクニック > Excel VBA > ファイル操作関連のテクニック > Bookオープン時にExcelを最小化してユーザーフォームを表示させる

即効テクニック

ファイル操作関連のテクニック

Bookオープン時にExcelを最小化してユーザーフォームを表示させる

(Excel 97/2000)
Bookを開いた時に、Excelを最小化しさらに、そのBookに含まれるユーザーフォームを表示させる場合、WorkbookオブジェクトのOpenイベントに以下のコードを記述します。
ユーザーフォーム「UserForm1」も用意してください。
Private Sub Workbook_Open()
    
    ' Excelを最小化
    Application.WindowState = xlMinimized
    
    ' Excelをアクティブなアプリケーションとする
    AppActivate "Microsoft Excel"
    
    ' ユーザーフォームの表示
    UserForm1.Show
End Sub