In einem Makro führe ich einen Teilcode nur aus, wenn der ein String in einem Bereichsnamen gefunden wird:
For Each nm In ActiveWorkbook.Names
If InStr(nm.Name, "JHoehe") > 0 Then
....
end if
next
Nun möchte ich das anders aufziehen:
Wenn ich eine Zelle ändere, soll der Code Ausfuehren ausgeführt werden, wenn die entsprechende Zelle (oder gegebenenfalls mehrere verbundene Zellen) mit einem Namen benannt ist, der den String "JHoehe" enthält.
Private Sub Worksheet_Change(ByVal Target As Range)
Call Ausfuehren
End Sub
Mir ist nicht klar, wie ich das hinkriege. Wer kann mir helfen?
Danke und Gruss, Peter