Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1624to1628
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
Filter auf 3 Spalten
25.05.2018 12:15:54
JoNNy
Hallo zusammen,
ich habe eine Tabelle mit Spalte "A" bis "I".
In diese möchte ich per Makro einen Sortierung/Filter setzten auf Spalte "A", "C" und Spalte "E".
Das ganze in der gleichen Reihenfolge/Priorisierung.
Ich habe das mal versucht aber es bewirkt nichts nicht einmal eine Fehlermeldung:
With MakroTabelleWS.Sort
.SetRange MakroTabelleWS.Range("A1:I" & LastRow)
.Header = xlGuess
.MatchCase = False
.Orientation = xlSortColumns
.SortMethod = xlPinYin
.Apply
End With
Gruß JoNNy

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Filter auf 3 Spalten
25.05.2018 12:58:26
UweD
Hallo
   With MakroTabelleWS
        .Sort.SortFields.Clear
        
        .Sort.SortFields.Add Key:=.Range("A1:A" & Lastrow) _
            , SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal
        .Sort.SortFields.Add Key:=.Range("C1:C" & Lastrow) _
            , SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal
        .Sort.SortFields.Add Key:=.Range("E1:E" & Lastrow) _
            , SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal
            
        .Sort.SetRange .Range("A1:I" & Lastrow)
        .Sort.Header = xlGuess
        .Sort.MatchCase = False
        .Sort.Orientation = xlTopToBottom
        .Sort.SortMethod = xlPinYin
        .Sort.Apply
    End With

LG UweD
Anzeige
Sehr cool klappt so besten Dank O.w.T.
25.05.2018 14:20:33
JoNNy
Prima! Danke für die Rückmeldung. owT
25.05.2018 14:23:01
UweD

303 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige