Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
280to284
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
280to284
280to284
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Letzte 12 Einträge einer Datenbank aussortieren

Letzte 12 Einträge einer Datenbank aussortieren
19.07.2003 16:13:12
Andreas
Liebes Forum,

ich habe ein Problem bei dem ich nicht mehr weiterweiss. Ich muss aus einer Access Tabelle die letzten zwölf Einträge pro Restaurant herausfiltern - dies hab ich mit einem Makro geschafft nur hab ich das Problem dass ich entweder den ältesten Eintrag zuerst oder am Ende stehen habe, ich bräuchte aber eine andere Filterung:

Store Datum bew_Datum Quality Service Cleanliness Total
1 06.03.2002 01.01.2002 100,00% 79,41% 90,63% 90,00%
1 06.03.2002 01.02.2002 100,00% 79,41% 90,63% 90,00%
1 06.03.2002 01.03.2002 100,00% 79,41% 90,63% 90,00%
1 08.06.2002 01.04.2002 100,00% 100,00% 100,00% 100,00%
1 08.06.2002 01.05.2002 100,00% 100,00% 100,00% 100,00%
1 08.06.2002 01.06.2002 100,00% 100,00% 100,00% 100,00%
1 07.09.2002 01.07.2002 100,00% 100,00% 100,00% 100,00%
1 07.09.2002 01.08.2002 100,00% 100,00% 100,00% 100,00%
1 07.09.2002 01.09.2002 100,00% 100,00% 100,00% 100,00%
1 04.11.2002 01.10.2002 100,00% 100,00% 90,63% 97,00%
1 04.11.2002 01.11.2002 100,00% 100,00% 90,63% 97,00%
1 04.11.2002 01.12.2002 100,00% 100,00% 90,63% 97,00%
1 24.01.2003 24.01.2003 100,00% 100,00% 100,00% 100,00%
1 15.02.2003 15.02.2003 100,00% 100,00% 93,75% 98,00%
1 22.03.2003 22.03.2003 100,00% 100,00% 100,00% 100,00%
1 04.04.2003 04.04.2003 100,00% 100,00% 100,00% 100,00%
1 12.05.2003 12.05.2003 100,00% 100,00% 90,63% 97,00%

Dies sind z.B. die Einträge von einem Restaurant... Ich habe wie gesagt jetzt entweder den 12.5.2003 als ersten oder letzten Eintrag. Korrekterweise sollte aber der Eintrag 24.1.2003 der erste sein (erster Eintrag aus diesem Jahr, dann sollten alle 2003 Einträge kommen und anschließend so viele Einträge aus dem vorigen Jahr bis 12 vorhanden sind.)... Könnt ihr mir helfen? Bitte!! Bei Bedarf kann ich euch gerne das Makro mittels Mail schicken, damit ihr den bisherigen Ansatz mit dem ich arbeite sehen könnt.

LG Andreas

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
: Letzte 12 Einträge einer Datenbank aussortieren
19.07.2003 16:58:15
Jörg Gradert
Hallo Andreas,
ich denke, dass Du in Spalte H das Jahr einfügen musst, um dann erst nach Jahr(Spalte H)
absteigend und anschliessend nach Datum (Spalte B) aufsteigend zu sortieren.
Gebe dazu in H2 die Formel =Jahr(B2) ein und kopiere sie runter.

Der Makrorekorder stellt die Sortierung dann so dar:

Range("A1:H18").Select
Selection.Sort Key1:=Range("H2"), Order1:=xlDescending, Key2:=Range("B2") _
, Order2:=xlAscending, Header:=xlGuess, OrderCustom:=1, MatchCase:= _
False, Orientation:=xlTopToBottom

leider kann ich dir mit dem Makro nicht weiterhelfen, da meine Kenntnisse dafür nicht ausreichen. Wie ich immer wieder hier im Forum lese kann auf Select meist verzichtet werden, also müsste auch Range("A1:H18").Sort direkt funktionieren.


Gruss Jörg


Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige