Microsoft Office Forum [ www.Office-Fragen.de ] >> READONLY <<

Microsoft Office 2003-2019 => Excel => Thema gestartet von: Sarahsa am Juni 22, 2018, 13:59:56 Nachmittag

Titel: Office 2016 Zeile nach Datum sortieren
Beitrag von: Sarahsa am Juni 22, 2018, 13:59:56 Nachmittag
Hallo Zusammen

Ich brauche Hilfe... :)

Ich habe eine Liste aus unserer Datenbank exportiert mit den Teilnehmern und den Daten an welchen Kursen sie teilgenommen haben. Die verschiedenen Kursdaten (01.02.18 / 05.03.18 etc) an denen der Teilnehmer teilgenommen hat, sind willkürlich durcheinander pro Zeile/Teilnehmer. Ist es möglich dass die Daten sich automatisch den entsprechenden Spalten zuordnen pro Zeile? Oder kann die Zeile zumindest nach Datum sortiert werden?

Ich komme nicht weiter...

Vielen Dank für eure Hilfe!

Liebe Grüsse
Titel: Antw:Office 2016 Zeile nach Datum sortieren
Beitrag von: maninweb am Juni 23, 2018, 09:44:37 Vormittag
Hallo,

Du müsstest etwas detaillierter werden, denn so ist das nicht nachvollziehbar. Als was exportiert die Datenbank die Daten?
Zum Beispiel CSV, Excel, oder ... Ausserdem, wie exportierst Du? Wenn das eine Abfrage der DB ist, ginge vielleicht schon
das Sortieren über die DB-Abfrage.

Gruß
Titel: Antw:Office 2016 Zeile nach Datum sortieren
Beitrag von: Sarahsa am Juni 25, 2018, 10:45:28 Vormittag
Hallo,

Entschuldigen, ich tu mich ein bisschen schwierig das zu erklären ohne einen Roman zu verfassen...

Die Daten exportieren wir als Excel aus unserer Datenbank. Diese ist schon ziemlich altertümlich und wird zum Glück auch bald abgelöst daher ist es über die DB leider nicht möglich sollte aber mit der neuen dann alles vereinfachen.

Daher suche ich eine Lösung übers Excel aber habe bis jetzt noch keine gefunden.

Ich versuche die unsortierten Daten pro Zeile aufsteigend zu sortieren doch dies gelingt mir nicht.

Siehe Anhang: in der obersten Zeile sind die Kursdaten. In den unteren Zeilen sind die Kursdaten ersichtlich an welche die Kandidaten teilgenommen haben. Nun versuche ich um mir Stunden Arbeit zu ersparen die Daten aufsteigen pro Zeile zu sortieren. Am besten wäre natürlich wenn die Daten den jeweiligen in der obersten Zeile zugeordnet wären.

Ich hoffe ich habe mich einigermassen verständlich ausgedrückt :)

Vielen Dank schon mal!!



Titel: Antw:Office 2016 Zeile nach Datum sortieren
Beitrag von: Packman am Juni 25, 2018, 11:24:57 Vormittag
Hallo Community

Mit Vba

Daten in einem Array übernehmen,um später die leeren Zellen zu ermitteln
Auffülle der leerstehenden Zellen bei der Tabelle mit Daten der darüberliegenden Zelle
Dann Sortieren
Über eine Schleife das Array durchlaufen lassen und auf leere Zellen abtasten,der darüberliegende Wert ist der Suchbegriff
Bei der Tabelle Wert suchen und den darunterliegenden Wert wieder löschen
So lassen sich auch Tabellen Sortieren mit unterschiedlicher Anzahl von leeren Zellen(Arrayabfrage auf eine oder mehrere leere Zellen)!

Gruß Packman
Titel: Antw:Office 2016 Zeile nach Datum sortieren
Beitrag von: Packman am Juni 25, 2018, 11:31:42 Vormittag
Hallo Community  :)

ops,sollte ja ohne Vba sein bzw der Fragesteller zuwenig Vba Kenntnisse!
Bei bedarf kann ich mich ja am Wochenende mal Probieren!

Gruß Packman
Titel: Antw:Office 2016 Zeile nach Datum sortieren
Beitrag von: Sarahsa am Juni 25, 2018, 12:58:46 Nachmittag
Hallo Packman

Vielen Dank für deine Rückmeldung aber ja, mit VBA kenne ich mich überhaupt nicht aus :)

Grundsätzlich wäre es schon völlig in Ordnung wenn die Zeilen chronologisch geordnet wären, die jeweils leeren Zellen wären so das Sahnehäubchen :)

Vielen lieben Dank!

Titel: Antw:Office 2016 Zeile nach Datum sortieren
Beitrag von: maninweb am Juni 25, 2018, 17:12:09 Nachmittag
Hallo,

bin mir zwar immer noch nicht sicher, ob ich Dich richtig verstanden habe, aber anbei mal ein Beispiel.
In der Tabelle Quelldaten wären die ersten 4 Zeilen Deiner Tabelle. Die Tabelle Ergebnis prüft, ob ein
Datum aus der Kopfzeile in einer Datenzeile zu finden ist und wenn Ja, übernimmt dieses.

Code: PHP
  1. =WENN(WENNFEHLER(VERGLEICH(D$1;Quelldaten!$D2:$K2;0);0)>0;D$1;"")

Musst Du schauen, ob das passt.

Gruß
Titel: Antw:Office 2016 Zeile nach Datum sortieren
Beitrag von: Packman am Juni 25, 2018, 20:14:17 Nachmittag
Hallo Community  :)

Spalte b muss ein eindeutiger Wert sein,falls doppelte Werte in Spalte A sind

Sortierspalten noch ergänzen,bei  Columns("A:B"). im Code B ersetzen!

Gruß Packman

Code: [Auswählen]
Sub Sortieren_mit_leeren_Zellen()
    Dim FilteredRange() As Variant, FilteredRangeNeu() As Variant
    Dim Zelle As Long, ZelleNeu As Long
    FilteredRange = Range("A1:B" & ActiveSheet.UsedRange.SpecialCells(xlCellTypeLastCell).Row)
    For Zelle = 2 To UBound(FilteredRange, 1)
        If FilteredRange(Zelle, 1) = "" Then Cells(Zelle, 1) = Cells(Zelle - 1, 1)
    Next Zelle
    Columns("A:B").Sort Key1:=Range("A2"), Order1:=xlAscending, Header:=xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
    FilteredRangeNeu = Range("A1:B" & ActiveSheet.UsedRange.SpecialCells(xlCellTypeLastCell).Row)
    For Zelle = UBound(FilteredRange, 1) To 2 Step -1
        If FilteredRange(Zelle, 1) = "" Then
            For ZelleNeu = UBound(FilteredRange, 1) To 2 Step -1
                If FilteredRangeNeu(ZelleNeu, 1) = FilteredRange(Zelle - 1, 1) And FilteredRangeNeu(ZelleNeu, 1) = FilteredRangeNeu(ZelleNeu - 1, 1) And FilteredRangeNeu(ZelleNeu, 2) = FilteredRange(Zelle, 2) Then FilteredRangeNeu(ZelleNeu, 1) = ""
            Next ZelleNeu
        End If
    Next Zelle
    Range("A1:B" & ActiveSheet.UsedRange.SpecialCells(xlCellTypeLastCell).Row) = FilteredRangeNeu
End Sub
Titel: Antw:Office 2016 Zeile nach Datum sortieren
Beitrag von: Packman am Juni 25, 2018, 20:47:11 Nachmittag
Hallo Community  :)

Ops ... Im Code an 4 Stellen B ersetzen!
Ist leicht zu entdecken!

3 mal bei
Range("A1:B"

1 mal bei
Columns("A:B")

Gruß Packman

Gruß Packman
Titel: Antw:Office 2016 Zeile nach Datum sortieren
Beitrag von: Packman am Juni 25, 2018, 20:51:36 Nachmittag
Hallo Community

Ich kann den Post leider nicht korrigieren!
Letzten einfach vergessen!

Bin halt ein wenig durcheinander geworden bei diesem Code(Anfänger eben)  :)

Gruß Packman
Titel: Antw:Office 2016 Zeile nach Datum sortieren
Beitrag von: Sarahsa am Juni 26, 2018, 13:27:55 Nachmittag
Hallo Maninweb

Ja, genau so sollte es aussehen! Vielen Dank! Allerdings sind meine Excel Kenntnisse so begrenzt dass ich mich mit den Quelldaten (geschweige denn mit Codes - vielen Dank Packman!) nicht so gut auskenne und ich es nicht schaffe die Formel in meiner Liste anzuwenden dass es richtig funktioniert.

Könntest du mir dabei vielleicht auch noch helfen? Entschuldige die Umstände...

Liebe Grüsse
Titel: Antw:Office 2016 Zeile nach Datum sortieren
Beitrag von: maninweb am Juni 26, 2018, 17:20:37 Nachmittag
Hallo,

kein Problem, anbei Deine Datei zurück, mit eingebauter Liste in Tabelle2.

Gruß
Titel: Antw:Office 2016 Zeile nach Datum sortieren
Beitrag von: Sarahsa am Juni 27, 2018, 08:32:16 Vormittag
Super, vielen lieben Dank, das hilft mir sehr weiter!

Damit ich die Formel übenehmen kann in eine andere Liste, kannst du mir noch zeigen wie die Tabelle Quelldaten aussehen muss?

Entschuldigen meine hundert Fragen...

Liebe Grüsse
Titel: Antw:Office 2016 Zeile nach Datum sortieren
Beitrag von: maninweb am Juni 27, 2018, 09:37:58 Vormittag
Hallo,

nein, das kann ich nicht. Denn einerseits kenne ich den Aufbau Deiner Mappe nicht und
andererseits ist die Quelldatentabelle Deine von der DB exportierte Tabelle.

Gruß

Titel: Antw:Office 2016 Zeile nach Datum sortieren
Beitrag von: Sarahsa am Juni 27, 2018, 16:22:50 Nachmittag
Hallo,

Ach so, nun ist mir der Groschen auch noch gefallen :) Es hat geklappt! Herzlichen Dank!

Liebe Grüsse