Frage zu Worksheet_Change
22.02.2009 16:03:37
Gordon
ich habe eine Tabelle (Name: DB), die sich, wenn ich etwas eintrage, von selbst sortiert:
Code
Private Sub Worksheet_Change(ByVal Target As Range)
Worksheets("DB").Range("A1:C2500").Sort Key1:=Range("b2"), Order1:=xlAscending, Key2:=Range("a2" _
) _
, Order2:=xlAscending, Header:=xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:= _
xlTopToBottom
End Sub
Nun möchte ich die Tabelle nicht mehr per Hand befüllen, sondern per Makro. Das funktioniert auch ohne Probleme. Nur wird sie nun nicht mehr sortiert, da die Daten nicht mehr per Hand eingetragen werden.
Kann mir da jemand helfen, damit es auch so sortiert werden kann?
Gruß
Gordon