Warum bekomme ich diesen Fehler: Die Methode 'Range' des Objekts '_Global' ist fehlgeschlagen, wenn ich:
Private Sub Workbook_SheetChange(ByVal WS As Object, ByVal Target As Range)
Dim NTT As Range
Set WS = ActiveSheet
Set NTT = WS.Range("$A$1:$U$154")
If Not Intersect(Target, Range("NTT")) Is Nothing Then '< error Here
Aber nicht, wenn ich sage
Private Sub Workbook_SheetChange(ByVal WS As Object, ByVal Target As Range)
Dim NTT As Range
Set WS = ActiveSheet
If Not Intersect(Target, Range("A$1:$U$154")) Is Nothing Then
Leider muss ich in einem Code das folgende Format verwenden: Range ("Name")
microsoft-excel
vba
Anao
quelle
quelle
Antworten:
Sie müssen das Range-Objekt anstelle eines Strings verwenden
Sie waren sehr nah!
quelle