Microsoft Office Forums - View Single Post - [Solved] Message Box vba when a sheet is activated

Marcia · 09-28-2022, 06:59 AM

Hi. I copied this code from Ablebits that gives me the right message when Sheet X is selected. How do I add to the code that if Sheet X or Y or Z is selected, the same message box pops up?

Code:

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
    On Error Resume Next
    If Sh.Name = "Sheet X" Then
        MsgBox "Print Form 2307", vbInformation, "Print 2307 Message"
    End If
End Sub

Thank you.