Excelで指定したワークシートをアクティブ化/開くときにメッセージボックスをポップアップするにはどうすればよいですか？

Excelでワークシートをアクティブ化するときに、ワークシートの詳細を通知するメッセージボックスのポップアップが必要になる場合があります。 以下の方法をお試しください。

VBAコードで指定されたワークシートをアクティブ化すると、メッセージボックスがポップアップ表示されます

VBAコードで指定されたワークシートをアクティブ化すると、メッセージボックスがポップアップ表示されます

次のVBAコードは、指定したワークシートをアクティブ化するときにメッセージボックスをポップアップするのに役立ちます。

1。 押す 他の + F11 キーを同時に開いて アプリケーション向け Microsoft Visual Basic 窓。

2. [Microsoft Visual Basic for Applications]ウィンドウで、ダブルクリックします このワークブック セクションに プロジェクト 開くペイン ThisWorkbook（コード） 窓。 次に、以下のVBAコードをコピーしてコードウィンドウに貼り付けます。

VBAコード：指定したワークシートをアクティブ化するとメッセージボックスがポップアップします

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
    On Error Resume Next
    If Sh.Name = "Sheet1" Then
        MsgBox "Please remember to fill in the daily sale", vbInformation, "Kutools for Excel"
    End If
End Sub

Note：コードで、Sheet1を指定したシート名に置き換えてください。 そして、メッセージボックスのコンテンツ「DailySaleに記入することを忘れないでください」を必要なコンテンツに置き換えます。

3。 押す 他の + Q キーを同時に閉じて アプリケーション向け Microsoft Visual Basic 窓。

これ以降、このワークシートをアクティブ化または開くと、以下のスクリーンショットに示すようにメッセージボックスが常にポップアップ表示されます。

関連記事:

• Excelで一定時間後にメッセージボックスを自動的に閉じるメッセージボックスタイマーを作成するにはどうすればよいですか？
• Excelで特定のセルをクリックしたときにメッセージボックスをポップアップするにはどうすればよいですか？
• Excelのメッセージボックスからテキストをコピーするにはどうすればよいですか？
• メッセージボックスをポップアップして、セルの範囲またはセル値をExcelに表示するにはどうすればよいですか？
• Excelでセル値が範囲内で変化した場合にメッセージボックスをポップアップするにはどうすればよいですか？