Gruppe
Ereignis
Problem
Bei Blattwechsel soll eine Meldung mit dem Namen des aktiven Blattes angezeigt werden.
ClassModule: DieseArbeitsmappe
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
MsgBox "Sie befinden sich in Blatt " & Sh.Name
End Sub