Hallo alle zusammen
Meine Frage bezieht sich in Access auf die Auflösung von Gruppierungen in VBA.
Mein Bericht hat folgende Gruppierung:
Gruppieren nach: t_K-daten.k-daten-kundennr
Grupieren nach a-artikel-kategorie
sortieren nach a-artikel-text
Beispiel Daten:
Food
Brot
Salzstangen
Weinbeeren
Werkzeug
Hammer
Zange
Diese Ausgabe funktioniert.
Nun möchte ich aber diesen Bericht per vba ändern, so dass alle Artikel ohne die Kategorie aufgelistet werden.
Also so:
Brot
Salzstangen
Hammer
Weinbeeren
Zange
Dazu habe ich folgenden Code geschrieben: Meine Frage bezieht sich auf Case 3, ich will keine Gruppierung, nur nach Artikel sortiert.
Private Sub Sortierung(vSortierung)
'Gruppierung Sortierung
'1 Gruppiert Kategorie & Sortiert Artikel
'2 Gruppiert Kategorie & Sortiert Eingabereihenfolge (ID)
'3 Keine Gruppierung, Sortiert nach Artikel
'4 Keine Gruppierung, Sortiert nach Eingabereihenfolge
'GroupLevel0 = t_k-daten.k-daten-kundennr
'GroupLevel1 = a-artikel-preis
'GroupLevel2 = a-artikel-text
Select Case vSortierung
Case 1
Me.GroupLevel(2).ControlSource = "a-artikel-text"
Case 2
Me.GroupLevel(2).ControlSource = "b-positionen-id"
Case 3
Me.Section(acGroupLevel2Header).Visible = False
Me.GroupLevel(2).ControlSource = "a-artikel-text"
Case 4
Me.Section(acGroupLevel2Header).Visible = False
Me.GroupLevel(2).ControlSource = "b-positionen-id"
End Select
End Sub
Jetzt wird wohl die Gruppierung aufgelöst, aber die Artikel werden zuerst nach der Guppe und erst dann nach dem Artikel sortiert. Also so:
Brot
Salzstangen
Weinbeeren
Hammer
Zange
Der Hammer müsste nach Brot kommen...
Was mache ich falsch? Oder was muss ich tun, damit mir nicht gruppiert wird, sondern nur nach Artikel sortiert?
Vielen Dank für Hinweise
Meine Frage bezieht sich in Access auf die Auflösung von Gruppierungen in VBA.
Mein Bericht hat folgende Gruppierung:
Gruppieren nach: t_K-daten.k-daten-kundennr
Grupieren nach a-artikel-kategorie
sortieren nach a-artikel-text
Beispiel Daten:
Food
Brot
Salzstangen
Weinbeeren
Werkzeug
Hammer
Zange
Diese Ausgabe funktioniert.
Nun möchte ich aber diesen Bericht per vba ändern, so dass alle Artikel ohne die Kategorie aufgelistet werden.
Also so:
Brot
Salzstangen
Hammer
Weinbeeren
Zange
Dazu habe ich folgenden Code geschrieben: Meine Frage bezieht sich auf Case 3, ich will keine Gruppierung, nur nach Artikel sortiert.
Private Sub Sortierung(vSortierung)
'Gruppierung Sortierung
'1 Gruppiert Kategorie & Sortiert Artikel
'2 Gruppiert Kategorie & Sortiert Eingabereihenfolge (ID)
'3 Keine Gruppierung, Sortiert nach Artikel
'4 Keine Gruppierung, Sortiert nach Eingabereihenfolge
'GroupLevel0 = t_k-daten.k-daten-kundennr
'GroupLevel1 = a-artikel-preis
'GroupLevel2 = a-artikel-text
Select Case vSortierung
Case 1
Me.GroupLevel(2).ControlSource = "a-artikel-text"
Case 2
Me.GroupLevel(2).ControlSource = "b-positionen-id"
Case 3
Me.Section(acGroupLevel2Header).Visible = False
Me.GroupLevel(2).ControlSource = "a-artikel-text"
Case 4
Me.Section(acGroupLevel2Header).Visible = False
Me.GroupLevel(2).ControlSource = "b-positionen-id"
End Select
End Sub
Jetzt wird wohl die Gruppierung aufgelöst, aber die Artikel werden zuerst nach der Guppe und erst dann nach dem Artikel sortiert. Also so:
Brot
Salzstangen
Weinbeeren
Hammer
Zange
Der Hammer müsste nach Brot kommen...
Was mache ich falsch? Oder was muss ich tun, damit mir nicht gruppiert wird, sondern nur nach Artikel sortiert?
Vielen Dank für Hinweise