Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1416to1420
1416to1420
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Daten sortieren - Was ist mit neuen Eintrag?

Forumthread: Daten sortieren - Was ist mit neuen Eintrag?

Daten sortieren - Was ist mit neuen Eintrag?
20.03.2015 10:35:07
matthias
Hallo,
ich habe über den Makrorecoder einen Sortiervorgang mit drei Bedingungen aufgezeichnet.
Funktioniert auch toll.
Aber wenn ich zusätzliche Werte in meine Spalte eintrage, werden die verständlicherweise nicht mit sortiert.
Wie kann ich so ein Problem lösen?

Anzeige

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Daten sortieren - Was ist mit neuen Eintrag?
20.03.2015 10:41:03
Rudi
Hallo,
Wie kann ich so ein Problem lösen?
indem du den Bereich neu setzt.
Gruß
Rudi

AW: Daten sortieren - Was ist mit neuen Eintrag?
20.03.2015 10:45:25
matthias
Hallo,
ja verstehe was du meinst.
Aber ich möchte dies ja nicht immer selber machen.
Excel sollte das automatisch erkennen, dass er hier den Bereich erweitern soll.
Geht so was?
Wenn ja wie?

Anzeige
AW: Daten sortieren - Was ist mit neuen Eintrag?
20.03.2015 10:46:36
Rudi
Hallo,
ich kenne deinen Code und deine Mappe nicht.
Gruß
Rudi

AW: Daten sortieren - Was ist mit neuen Eintrag?
20.03.2015 10:52:44
matthias
Hallo,
anbei der Code aus dem Modul.
Sub Makro1()
Rows("16:18").Select
ActiveWorkbook.Worksheets("Aufstellung Brandschutzklappen").Sort.SortFields.Clear
ActiveWorkbook.Worksheets("Aufstellung Brandschutzklappen").Sort.SortFields.Add Key:=Range(" _
B16:B18") _
, SortOn:=xlSortOnValues, Order:=xlAscending, CustomOrder:="RLT_Nummer", _
DataOption:=xlSortNormal
ActiveWorkbook.Worksheets("Aufstellung Brandschutzklappen").Sort.SortFields.Add Key:=Range(" _
AL16:Al18") _
, SortOn:=xlSortOnValues, Order:=xlAscending, CustomOrder:="Luftart", _
DataOption:=xlSortNormal
With ActiveWorkbook.Worksheets("Aufstellung Brandschutzklappen").Sort
.SetRange Range("A16:BI18")
.Header = xlGuess
.MatchCase = False
.Orientation = xlTopToBottom
.SortMethod = xlPinYin
.Apply
End With
End Sub
Ich habe zwei Benutzerdefinierte Lsiten definiert als Vorgabe für die Sortierreihenfolge

Anzeige
AW: Daten sortieren - Was ist mit neuen Eintrag?
20.03.2015 11:53:35
Rudi
Hallo,
teste mal. 
Sub Makro1()
Dim rSort As Range
With ActiveWorkbook.Worksheets("Aufstellung Brandschutzklappen")
Set rSort = .Range(.Cells(16, 1), .Cells(.Rows.Count, 1).End(xlUp).Offset(, 60))
With .Sort
.SortFields.Clear
.SortFields.Add Key:=Range("B16"), _
SortOn:=xlSortOnValues, Order:=xlAscending, _
CustomOrder:="RLT_Nummer", DataOption:=xlSortNormal
.SortFields.Add Key:=Range("AL16"), _
SortOn:=xlSortOnValues, Order:=xlAscending, _
CustomOrder:="Luftart", DataOption:=xlSortNormal
.SetRange rSort
.Header = xlGuess
.MatchCase = False
.Orientation = xlTopToBottom
.SortMethod = xlPinYin
.Apply
End With
End Sub

Gruß
Rudi

Anzeige
AW: Daten sortieren - Was ist mit neuen Eintrag?
23.03.2015 09:21:16
Matthias
Hallo,
er bringt mir den Fehler.
Fehler beim Kompilieren.
End With erwartet.
Irgendwie geht es nicht.
Habe den Code in ein Modul kopiert.

AW: Daten sortieren - Was ist mit neuen Eintrag?
23.03.2015 15:07:29
Helmut
Hallo,
dann füge vor End Sub noch ein End With ein !
Gruß

AW: Daten sortieren - Was ist mit neuen Eintrag?
27.03.2015 08:11:41
Matthias
Vielen Dank.
Funktioniert bestens
Anzeige

Forumthreads zu verwandten Themen

Was ist dass Es erscheinen merkwürdige Makros ???
juergen

Hallo liebe Excel Gemeinde
Bei mir passiert etwas sehr mekwürdiges.Und zwar
Öffne ich Excel mit leerem Blatt und gehe dann in die VBA Umgebung ist alles sauber.
Öffne Ich die Exceldatei von Hajo.Ziplies "nur_mit_aktivierten_makros_zeit_loeschen.xls"
Und gehe dann auf Makros...
30.03.2009 19:21:05
Thread-ID: 1065401
8 Beiträge
Mehrere Pivottabellen auf einen Filter reagieren
vux

Hallo,
einfaches Anliegen:
Sagen wir ich habe eine Tabelle mit einer Spalte "Länder" und ein Sheet mit 20 Auswertungspivottabellen.
Kann man es einrichten, dass wenn man an einer Stelle ein Land eingibt, alle Pivottaballen nach diesem Land gefiltert werden? Sonst muss ich jedesmal 2...
16.06.2009 14:53:58
Thread-ID: 1081917
3 Beiträge
Anzeige
mehrere Pivottabellen abgleichen
Falk D

Hallo SpezalistenIch habe in einem Worksheet 3 Pivotabellen in denen ich über die "Seiten"-Gruppierung Werte auswähle. Nun suche ich einen Code, welcher mir Bei auswahl in der ersten Tabelle die beiden weiteren mitaktualisiertDankeFalk
12.04.2002 11:40:17
Thread-ID: 112744
2 Beiträge
Einfügen funktioniert nicht
Space

Hallo,
bekomme immer einen Laufzeitfehler9 in der fett markierten Zeile beim ausführen des Codes.
Sub
....
With wks
.Range(.Cells(2, 1), .Cells(2, 1).End(xlDown)).Resize(, 22).Copy
Workbooks("Data Generator.xls").Sheets("Kundenkontakte").Range("A18").PasteSpecial Paste:=...
26.01.2010 11:35:30
Thread-ID: 1133006
3 Beiträge
Mehrere Pivottabellen gleichzeitig anpassen
Frank

Hallo zusammen!
Ich habe ein Arbeitsblatt "Tabelle 4", in dem sich zehn verschiedene Pivottabellen befinden, die alle ein Feld namens "CMT_L2" beinhalten.
Bei Änderung dieses Feldes in einer der Pivottabellen möchte ich erreichen, daß auch alle anderen Pivottabellen dementsprechend ange...
31.03.2010 09:43:27
Thread-ID: 1149532
4 Beiträge
Was ist eine "generic object variable"
Maria

Hallo Ihr Excel-Kundigen!Könnt Ihr mir vielleicht erklären, was unter "generic object variable" bzw. "any specific object variable" zu verstehen ist?Ich versuche aus Ressourcengründen bei einer For each... Next Schleife vom Variant-Variablentyp wegzukommen und die Excel-Hilfe gibt mir diese bei...
07.05.2002 18:19:55
Thread-ID: 119290
3 Beiträge
HILFE - was ist mit meiner ADOD.Connection los
Stefan

Ich bin echt am verzweifeln.
Folgendes hab ich versucht. Ich habe eine (funktionierende) Prozedur in ein neues Modul einer anderen Excel-Datei verschoben und wollte es dort ausführen. Dann bekam ich folgende Fehlermeldung:Fehler beim Kompilieren: Benutzerdefinierter Typ nicht definiertin Be...
21.05.2002 18:11:06
Thread-ID: 122490
2 Beiträge
Anzeige
Hilfe, was ist mit meinem Excel los
Stefan

Ich hab nun 8 Stunden damit verbracht eine Auswertung von Offerten einzugeben.Nun möchte ich die Summe einer Spalte errechnen, doch nun bleibt nur die Formel in der Zelle stehen.(Das Resultat bleibt verborgen)
Dies obwohl ich den Haken in der "Option-Ansicht-Formel" entfernt habe.Kann mir bi...
18.07.2002 16:31:13
Thread-ID: 138061
4 Beiträge
Einfügen funktioniert nicht
Hans


Hallo, ich bräuchte bitte Hilfe für ein VBA problem.
Ich möchte mittels folgendem Makro eine Zelle kopieren.
Das Sheet wird ordentlich kopiert, jedoch wird die Zelle nicht richtig eingefügt. Falls ich im Anschluss ctrl v drücke wird der Zelleninhalt eingefügt. Wo liegt der Fehler?<...
02.03.2015 17:54:57
Thread-ID: 1412337
3 Beiträge
Spalten Kopieren- Einfügen funktioniert nicht
dove89

Hallo zusammen,
ich hab ein kleines Problem. Mit dem unten stehenden Code such ich in der ersten Zeile nach einem Wort. Wenn es gefunden wurde, kopiert das Makro mir die ganze Spalte und fügt es in einem anderen Sheet in die Spalte ZZ ein.
Da ich aber nun sehr große Datenmengen habe, wo...
31.08.2016 12:24:38
Thread-ID: 1512120
2 Beiträge
Was ist hier falsch? - eine Zelle suchen in Spalte
Tobi

Hallo zusammen,
was ist hier falsch?
Ich möchte den Wert (könnte so aussehen: H-L112-13-2110-0-0-30a)aus der Zelle "i9" von der "Tabelle 1", in der "Tabelle 2" in der ganzen Spalte "Y" suchen. Wenn etwas gefunden wird, soll "Grafik 1" eingeblendet werden wenn nicht soll "Grafik 2" einge...
25.07.2017 10:10:20
Thread-ID: 1570686
11 Beiträge
Was ist das für ein VBA UserForm Control?
Klaus

Hallo an Alle,
Ich versuche ein UserForm zu bauen, indem ein Control mit mehreren Zeilen und Spalten bestimmte Symbole aus einem bestimmten Zeichensatz anzeigt. Das Füllen mit den Symbolen ist kein Problem für mich. Habe es mit ListBox und ComboBox ausprobiert.
Aber leider schaffe ich...
11.03.2018 19:55:33
Thread-ID: 1613645
7 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige