Gruppe
Dialog
Problem
Sowohl beim Öffnen der Arbeitsmappe wie auch bei der Auswahl einer Zelle in Spalte A soll eine MsgBox erscheinen.
ClassModule: DieseArbeitsmappe
Private Sub Workbook_Open()
MsgBox "Hallo, ich bin die Arbeitsmappe " & Me.Name
End Sub
ClassModule: Tabelle1
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column = 1 Then
MsgBox "Hallo, ich bin die Zelle " & Target.Address
End If
End Sub