Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

tabelle1 öffnen und autom. sortieren

Forumthread: tabelle1 öffnen und autom. sortieren

tabelle1 öffnen und autom. sortieren
15.10.2007 12:09:24
lisa
Hallo zusammen
Zur Zeit sortiere ich meine Daten per Befehlsbutton, würde aber gern die Daten sortieren wenn ich das Tabellenblatt öffne bzw. von einem anderen auf dieses wechsel.
Ich habe es als Sub Worksheet_open () versucht aber das funktioniert leider nicht.
ActiveSheet.Unprotect
Range("A3:I65000").Select
Selection.Sort Key1:=Range("A4"), Order1:=xlDescending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortTextAsNormal
Kann mir hier jemand einen Rat geben, wie ich das umstze?
liebe Grüße Lisa

Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: tabelle1 öffnen und autom. sortieren
15.10.2007 12:20:03
IngGi
Hallo Lisa,
so sollte das gehen:

Private Sub Worksheet_Activate()
ActiveSheet.Unprotect
Range("A3:I65000").Select
Selection.Sort Key1:=Range("A4"), Order1:=xlDescending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortTextAsNormal
End Sub

Gruß Ingolf

Anzeige
AW: das war es DANKE oT.
15.10.2007 15:28:25
lisa
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige