トップ > 逆引きで学ぶ ユーザーフォーム&コントロール > 1-34　フォームがアクティブになったらExcelを非表示にする

Activateイベントは、フォームがアクティブになると発生します。
Initializeイベントとは違い、Loadステートメントでは発生しません。
しかし、他のフォームにフォーカスが移り、その後フォーカスが戻ってきた場合にも発生するので、フォームを行き来するような構成の場合には、その点を意識する必要があります。

サンプルコード

フォームがアクティブになったらExcelアプリケーションを2秒間非表示にし、その後再表示する

Private Sub UserForm_Activate()
    Excel.Application.Visible = False
    Application.Wait Now() + TimeValue("00:00:02")
    Excel.Application.Visible = True
End Sub