Codeschnipsel mit Intersect
Jörg-HH
warum wird in diesem Codeabschnitt
Private Sub Worksheet_Change(ByVal Target As Range)
...
Dim berGrammatur As Range
If Not Intersect(Target, berGrammatur) Is Nothing Then
MsgBox "siehe im Code Tabelle31 ganz unten"
Else
...
"ungültiger Prozeduraufruf" gemeckert, wenn ich in berGrammatur was ändere?
Grüße - Jörg