Excel nach Alphabet/Zuständigkeit sortieren?

3 Antworten

Mit einer Formel bekomme ich das nicht hin aber mit einem Makro.

So fügst du es ein:

Entwicklertools -> Visual Basic Editor -> Diese Arbeitsmappe

Quelltext:

Sub Gruppen()

On Error Resume Next

Dim erstesZeichen, zweitesZeichen

For i = 1 To Cells(Rows.Count, 1).End(xlUp).Row
    If Len(Cells(i, 1)) < 3 Then
        erstesZeichen = Asc(Left(Cells(i, 1), 1))
        If Len(Cells(i, 1)) > 1 Then
            zweitesZeichen = Asc(Right(Cells(i, 1), 1))
        Else
            zweitesZeichen = 0
        End If
        
        Select Case True
            Case (erstesZeichen = 77 And zweitesZeichen < 66) Or (erstesZeichen < 77)
                Cells(i, 2) = "Gruppe A"
            Case (erstesZeichen = 82 And zweitesZeichen < 66) Or (erstesZeichen < 82)
                Cells(i, 2) = "Gruppe B"
            Case (erstesZeichen <= 90)
                Cells(i, 2) = "Gruppe C"
            Case Else
                Cells(i, 2) = "FALSCH"
        End Select
    Else
        Cells(i, 2) = "FALSCH"
    End If
Next

End Sub

So sieht es aus:

Bild zum Beitrag

Woher ich das weiß:Berufserfahrung
 - (Microsoft Excel, Excel 2010)

Du aktivierst in der Kopfzeile deiner Daten den Autofilter. In jedem Spaltenkopf kommen die kleinen Dreiecke zum Vorschein.
Dort kannst du dann filtern (fast) nach Lust und Laune.

Bild zum Beitrag

 - (Microsoft Excel, Excel 2010)

Ich vermute, dass es sich um eine namentliche Zuordnung handelt.

Dann könntet Du folgendes machen und nach Spalte D (Namen) alphabetische sortieren. Die alphabetische Reihenfolge der Spalte C ergibt sich automatisch

Bild zum Beitrag

Wenn Du die Buchstaben der Spalte A erweitern müsstest könntest Du die Formel "flexibel" gestalten in dem Du die Buchstabenzuordnung A,B,C als Zellbezug wählst

=WENN(LINKS(D1;2)>=LINKS(B$3;2);A$3;WENN(LINKS(D1;2)>=LINKS(B$2;2);A$2;WENN(LINKS(D1;2)>=LINKS(B$1;2);A$1)))

Woher ich das weiß:eigene Erfahrung
 - (Microsoft Excel, Excel 2010)