Target.Adress mit Range vergleichen
25.06.2004 21:10:33
Thorsten
ich moechte folgendes machen:
Wenn in einem vorgegebenen Bereich (myRange) etwas geaendert wird, dann soll die Funktion "testen" aufgerufen werden. Aus diesem Grund muss ich ueberpruefen, ob die Zelle in der die Aenderung vorgenomen wurde, zu dem MyRange-Bereich gehoert.
Leider schaffe ich es nicht, diesen Vergleich zu realisieren. Ich hoffe ihr koennt mir weiterhelfen.
Vielen Dank
Thorsten,
der sich, wie man warscheinlich unschwer erkennen kann, gerade im Ausland (USA) befindet :)
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
Dim myRange As Range
Set myRange = Worksheets("Sheet1").Range("$A$4:$O$65536")
If Target.Address(0, 0) <> "Range" Then Exit Sub
If Target.Count > 1 Then Exit Sub
Call testen(Target.Column, Target)
End Sub