Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
1704to1708
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
Inhaltsverzeichnis

Sortierung nur für eine Seite

Sortierung nur für eine Seite
15.08.2019 13:30:45
Burghard
Hallo,
ich habe eine Datei mit 7 Seiten, die per VBA vor dem Ausdruck sortiert werden. Mit der Sortierung bin ich für die Seite 3 nicht zufrieden (es werden dort Daten aus verschiedenen Tabellenblättern geholt), die anderen Seiten stimmen.
Ist es möglich per VBA die untere Sortierung nur für die Seite 3 durchzuführen? Ich würde den Code dann in die Prozedur einbauen.
Columns("A:D").Sort Key1:=Range("B2"), Order1:=xlAscending, Key2:=Range("C2") _
, Order2:=xlAscending, Key3:=Range("D2"), Order3:=xlAscending, Header:= _
xlGuess, OrderCustom:=5, MatchCase:=False, Orientation:=xlTopToBottom
Range("A1").Select
Hilfe wäre nett.
Grüße
Burghard

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

Betreff
Datum
Anwender
Anzeige
AW: Sortierung nur für eine Seite
15.08.2019 14:10:58
Daniel
HI
wenn du nur das Blatt 3 in sich selbst sortieren willst:
dim Z1 as Long, Z2 as Long
Z1 = ActiveSheet.HPageBreaks.Item(2).Location.Row
Z2 = ActiveSheet.HPageBreaks.Item(3).Loaction.Row - 1
Range(Cells(Z1, 1), Cells(Z1, 4)).Sort Key1:=Cells(Z1, 2), Order1:=xlascending, _
Key2:=Cells(Z1, 3), Order2:=xlascending, _
Key3:=cells(Z1, 4), Order3:=xlascending, _
Header:=xlno
Gruß Daniel
AW: Sortierung nur für eine Seite
15.08.2019 14:16:10
Armin
Hallo,
Du musst halt nur die Tabelle mit einbeziehen.
With Worksheets("Tabelle3")
.Columns("A:D").Sort Key1:=.Range("B2"), Order1:=xlAscending, Key2:=.Range("C2") _
, Order2:=xlAscending, Key3:=.Range("D2"), Order3:=xlAscending, Header:= _
xlGuess, OrderCustom:=5, MatchCase:=False, Orientation:=xlTopToBottom
End With 

Gruß Armin
Anzeige

300 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige