Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
916to920
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
916to920
916to920
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

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

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

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

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige