Live-Forum - Die aktuellen Beiträge
Datum
Titel
20.04.2024 00:49:19
Excel Sheet in einen Excel Kalender einfügen
20.04.2024 00:08:11
In Ordner nur das Speichern von Dateien erlauben
19.04.2024 21:26:15
mehrfache Texte finden
19.04.2024 19:41:34
Bei VBA Ausführung Anzeige einfrieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
508to512
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
508to512
508to512
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Hilfe beim automatischen Sortieren (mit Makro)

Hilfe beim automatischen Sortieren (mit Makro)
29.10.2004 21:18:31
Harald
Hallo, vielleicht weiß einer von euch Rat, ich komme nicht weiter.
https://www.herber.de/bbs/user/12786.xls
Auf der ersten Seite werden Tabellen mit Ergebnissen gefüllt. Auf der zweiten Seite sollen dann automatisch Ranglisten erstellt werden, die sich automatisch immer dann neu Sortieren, wenn auf der ersten Seite eine Eingabe erfolgt.
Das Makro auf der zweiten Seite habe ich richtig (denke ich) zusammengebastelt, aber es wird nicht ausgeführt, was muss ich ändern?
Sortierreihenfolge ist Status und dann Rang.
Danke für eure Hilfe.
CU Harald
AW: Hilfe beim automatischen Sortieren (mit Makro)
Reinhard
Hi Harald,
wie schon von dir angedacht.
in das Modul:
Sub Tabellensortieren()
Worksheets("Ergebnistabelle Kinder").Range("A10:M14").Select
Selection.Sort Key1:=Range("A10"), Order1:=xlDescending, Key2:=Range( _
"B10"), Order2:=xlAscending, Header:=xlNo, OrderCustom:=1, MatchCase:= _
False, Orientation:=xlTopToBottom
End Sub
den Code in Tabelle 2 löschen und in Tabelle 1:

Private Sub Worksheet_Change(ByVal Target As Range)
Tabellensortieren
End Sub

Gruß
Reinhard
AW: Hilfe beim automatischen Sortieren (mit Makro)
29.10.2004 21:42:06
Harald
Ok, die Logik habe ich verstanden, die Änderung in Tabelle 1 ruft das Modul 1 auf, und da steht die Sortieranweisung drin,
aber ich bekomme da Laufzeitfehler 1004 -- Die Select Methode des Range Objekts konnte nicht ausgeführt werden. Was hängt denn da jetzt.
Danke für die Hilfe, Harald
Anzeige
AW: Hilfe beim automatischen Sortieren (mit Makro)
29.10.2004 21:47:44
Josef
Hallo Harald!
Das kommt weil die entsprechende Tabelle nicht aktiv ist!
Machs ohne Select, dann geht's!

Sub Tabellensortieren()
With Worksheets("Ergebnistabelle Kinder").Range("A10:M14")
.Sort Key1:=.Range("A10"), Order1:=xlDescending, Key2:=.Range( _
"B10"), Order2:=xlAscending, Header:=xlNo, OrderCustom:=1, MatchCase:= _
False, Orientation:=xlTopToBottom
End With
End Sub

Gruß Sepp
AW: Hilfe beim automatischen Sortieren (mit Makro)
29.10.2004 21:53:47
Harald
Mh, das wars leider auch nicht, jetzt wird das Makro noch nicht mal ausgeführt.....
AW: Hilfe beim automatischen Sortieren (mit Makro)
K.Rola
Hallo,
versuchs mal so:
Option Explicit
Sub Tabellensortieren()
With Worksheets("Ergebnistabelle Kinder")
.[A10:M14].Sort Key1:=.[A10], Order1:=xlDescending, Key2:=.[b10], _
Order2:=xlAscending, Header:=xlNo
End With
End Sub

Gruß K.Rola
Anzeige
AW: Hilfe beim automatischen Sortieren (mit Makro)
29.10.2004 22:09:10
Harald
Ich bin da anscheinend echt zu doof zu, auch das ging nicht....
Ich habe euch jetzt mal die Orginaldatei hochgeladen, vielleicht könnt ihr es ja ergänzen?
https://www.herber.de/bbs/user/12789.xls
Währe super klasse.....
Danke Harald
AW: Hilfe beim automatischen Sortieren (mit Makro)
29.10.2004 22:25:42
Josef
Hallo Harald!
Das Makro funzt!
Allerdings weis ich nicht ob "Order1:=xlDescending" richtig ist,
mehr Sinn ergäbe für mich "Order1:=xlAscending".
Gruß Sepp
AW: Hilfe beim automatischen Sortieren (mit Makro)
K.Rola
Hallo,
ich weiß ja nicht, was du erwartest, aber das Sortieren funktioniert.
Gruß K.Rola
AW: Hilfe beim automatischen Sortieren (mit Makro)
29.10.2004 22:30:55
Harald
Bei mir aber leider nicht, und ich weiss nicht warum.
Sobald ich auf der ersten Seite den Status ändere müsste auf der zweiten umsortiert werden....... tut es aber leider nicht......
Anzeige
AW: Hilfe beim automatischen Sortieren (mit Makro)
Reinhard
Hi Martin,
Füge in das Sortiermakro
msgbox "sortiere"
ein
ODER gehe in das Modul und klicke links davon in die graue Leiste vor dem eigentlichen Sortierbefehl.(das nennt man Haltepunkt setzen
Jetzt ändere was in tabelle1,
kommt jetzt die msgbox bzw
erscheint der Editor und die zeile im Code ist gelb unterlegt?
(, dann kannst du mit F8 bzw F5 weitermachn im Editor)
Erzaähl mal was da passiert.
Gruß
Reinhard
Anzeige
AW: Hilfe beim automatischen Sortieren (mit Makro)
29.10.2004 22:47:39
Harald
Hallo,
der hängt sich an der Zeile
Worksheets("Ergebnistabelle Kinder").Range("A10:M14").Select
mit dem beschriebenen Fehlercode 1004 auf.... zum sortieren kommt er gar nicht...
Sorry, keine Idee mehr, steige aus o.w.T.
Reinhard
AW: Hilfe beim automatischen Sortieren (mit Makro)
K.Rola
Hallo,
nimm doch mal die Mappe, die ich dir hochgeladen habe, da gibts kein select und
die funktioniert auch. Du solltest nur mal Excel beenden und neu starten.
Gruß K.Rola
AW: Hilfe beim automatischen Sortieren (mit Makro)
29.10.2004 23:30:31
Harald
Hallo, Problem gelöst......
DANKE an alle, jetzt hab ich zwar noch ne Nachschicht vor mir, um die Tabelle zu vervollständigen, aber jetzt läufts.....
CU Harald
sind wohl doch die Events un treu ähh True ;-) o.T
29.10.2004 22:38:42
Josef
Gruß Sepp
AW: Hilfe beim automatischen Sortieren (mit Makro)
29.10.2004 21:59:31
Josef
Hallo Harald!
Das Makro klappt sicher!
Kommt immer noch der Laufzeitfehler?
Wenn nein, dann kopier den folgenden Code in irgend ein Modul und lass in mal laufen.
Danach Probierst du's nochmal!
Gruß Sepp
Anzeige
Code vergessen! ;-))
29.10.2004 22:00:36
Josef 

Sub Enable()
Application.EnableEvents = True
End Sub

301 Forumthreads zu ähnlichen Themen

Tabelle automatisch sortieren
anke

Hi Excelfreunde,
ich habe einmal wieder ein kleines Problem ( für alle Excelfreaks );
ich möchte, daß sich eine Tabelle automatisch nach Eingabenende und " Enter " sortiert:
Ist das überhaupt möglich ?
Gruß Anke
28.08.2008 17:22:00
Thread-ID: 1005538
6 Beiträge
Anzeige
Formeln automatisch generieren OHNE Makros
Mr.PT

Guten Tag an die Excel-Gemeinde,
ein Bekannter gab mir eine Excel-Mappe, in welcher durch den manuellen Eintrag von Werten eine
Summenformel automatisch von oberhalb kopiert wird. Es entsteht also in einer bisher leeren Zelle
ein komplett neuer Formel-Eintrag nach folgendem Beispiel...
05.02.2009 09:45:00
Thread-ID: 1047306
3 Beiträge
Sortieren mit Formel
Mike


Hey Cracks,
wieso werden in der nachfolgenden Formel in Spalte K die Einträge mehrmals
angzeigt? Weil es auch nummerische Einträge hat?
Eingabe Ausgabe

 IJK24  http://www.excelformeln.de/formeln.html?welcher=23625KST 134 AB 11026KST 135 AB 11027...
26.03.2009 12:49:14
Thread-ID: 1064208
5 Beiträge
Anzeige
Datei automatisch speichern nach Eingabe
Franz

Hallo zusammen,
habe folgendes Problem:
über eine Vorlage (XLT) wird ein neues Arbeitsblatt erstellt. In 2 Zellen (D7 und B13) sollen Kundennummer und Reparaturnummer eingetragen werden. Auf dem Blatt gibt es einen Button der die Datei dann speichert und zwar in der Form: Kundennummer_R...
29.04.2009 13:13:57
Thread-ID: 1071890
2 Beiträge
Geburtsdatum nach Tag und Monat sortieren
Susann

Hallo,
wie kann ich eine Spalte so sortieren, dass er mir das Geburtsdatum nicht auch nach dem Jahr sortiert, also so, dass ich z.B. sehen kann, dass Hans am 20.12.1980 geboren ist und Fritz am 20.12.1930 und beiden sozusagen gratulieren kann :-)
Vielen lieben Dank mal wieder für eure...
05.06.2009 14:45:45
Thread-ID: 1079470
4 Beiträge
Kopierte Werte nach Datum (aus)sortieren
Sirenia

Einen wunderschönen guten Morgen miteinander,
ich stehe vor folgendem Problem:
Ich kopiere Werte aus den Sheets M1-M4 mit diesem Code in die erste freie Reihe eines jeden Sheets (Werte aus Reihe 7 in M1 werden in die erste freie Reihe von M1 geschrieben, usw.).
Private Sub CommandBu...
13.07.2009 12:19:47
Thread-ID: 1088133
17 Beiträge
Sortieren nach Datum
Andreas

Hallo Forum,
ich habe eine Tabelle in der in Spalte A nur Datumswerte stehen, in B und C die dazugehörigen Aufgaben.
nun möchte ich das immer das nächste aktuelle datum in der ersten zeile steht.
ist ein Datum vorbei soll es sich ans Ende der Tabelle stellen.
Vielen Dank im vorr...
15.08.2009 18:58:53
Thread-ID: 1096168
3 Beiträge
Nach Datum automatisch beim Öffnen sortieren
chris58

Hallo !
Ich habe diesen Code hier gefunden, Jedoch sortiert dieser Code nur die Spalte A. Ich habe aber 9 Spalten (also von A-I). Was muß ich ändern, daß der code alle Spalten sortiert.
Danke für eure Antwort
chris
Private Sub Workbook_Open() Sheets("Tabelle1").Columns(1).Sort...
09.09.2009 22:46:58
Thread-ID: 1101630
3 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
5
1
2
4
4
1
3
16
2
2
9
4
3
5
4
3
17
26
14
2
2
2
8
4
6