Markierte Zellen & Ergebnisse anzeigen

[Solevita]

Hallo Uwe,

ich setzte also beispielsweise folgenden Code unter Worksheet_SelectionChange? 

Code:

Me.Unprotect
    If Not Intersect(Target, Me.Range("B23")) Is Nothing Then
        Me.Cells(Target.Row, Target.Column).Select
    End If
    Me.Protect

Wenn ich das tue, wird zwar gesperrt, die Fehlermeldungen bleiben aber beim klicken in die Tabelle bestehen.