Private Sub OptionButton11_Click()
Cells.Select
Selection.Sort Key1:=Range("K2"), Order1:=xlAscending, Header:=xlYes, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
Cells(2, 1).Select
End Sub
Sub Sort_Hilfsspalte()
Dim oSh As Worksheet, iCalc%
Dim SortColum$
SortColum = "K" 'Sortieren nach Spalte?
Set oSh = Sheets("Tabelle1") 'Tabelle anpassen
With Application
iCalc = .Calculation
.ScreenUpdating = False
.EnableEvents = False
.Calculation = xlCalculationManual
With oSh.UsedRange
SortColum = oSh.Range(SortColum & "1").Column
With .Columns(.Columns.Count).Offset(0, 1)
'Hilfsformel
.FormulaR1C1 = _
"=IF(ISERR(--LEFT(RC" & SortColum & _
",FIND(""/"",RC" & SortColum & ")-1)),RC" & _
SortColum & ",--LEFT(RC" & SortColum & _
",FIND(""/"",RC" & SortColum & ")-1))"
oSh.UsedRange.Sort .Cells(1, 1), Order1:=xlAscending, Header:=xlYes
.Cells(1, 1).EntireColumn.Delete
End With
End With
.ScreenUpdating = True
.EnableEvents = True
.Calculation = iCalc
End With
End Sub
Um in Excel nach den ersten zwei Stellen einer Zelle zu sortieren, kannst du folgende Schritte befolgen:
=LINKS(A1;2) in der ersten Zeile der Hilfsspalte. Diese Formel zieht die ersten zwei Zeichen aus der Zelle A1.Daten in der Menüleiste.Sortieren.Fehler 1: Sortierung funktioniert nicht richtig
Fehler 2: Daten werden nicht sortiert
Fehler 3: Erste Zeile nicht sortieren
VBA-Lösungen: Du kannst auch VBA verwenden, um die Sortierung durchzuführen, ohne eine Hilfsspalte zu erstellen. Hier ein Beispielcode:
Sub SortierenOhneHilfszelle()
Dim berSort As Range, x As Range
Set berSort = ActiveSheet.UsedRange
For Each x In berSort
x.Value = "'" & x.Value ' Apostroph vor jedem Wert setzen
Next x
berSort.Sort Key1:=Range("A1"), Order1:=xlAscending, Header:=xlYes
End SubTextformatierung: Wenn du mit Zahlen und Text arbeitest, stelle sicher, dass die Zellen als Text formatiert sind, um eine korrekte Sortierung zu gewährleisten.
Beispiel 1: Du hast die Werte 60, 70 und 60/62 in Spalte A. Verwende die Hilfsspalte, um die ersten zwei Zeichen zu extrahieren und sortiere dann nach dieser Spalte. Der Wert 60/62 wird vor 70 angezeigt.
Beispiel 2: Um nach einer bestimmten Spalte zu sortieren, z.B. Spalte K, kannst du die Formel =LINKS(K1;2) in einer Hilfsspalte verwenden und dann die gesamte Tabelle nach dieser Hilfsspalte sortieren.
1. Wie kann ich eine Excel-Spalte sortieren, ohne die erste Zeile zu sortieren? Wenn du die erste Zeile als Header hast, wähle beim Sortieren die Option „Header enthalten“ aus, um sicherzustellen, dass die erste Zeile nicht sortiert wird.
2. Kann ich direkt nach den ersten zwei Zeichen sortieren, ohne eine Hilfsspalte zu verwenden? Ja, du kannst VBA verwenden, um dies zu erreichen, indem du den entsprechenden Code anwendest.
3. Was, wenn meine Daten Zahlen und Text enthalten? In diesem Fall ist es wichtig, die Zellen als Text zu formatieren und sicherzustellen, dass die Sortierung korrekt angewendet wird, um unerwartete Ergebnisse zu vermeiden.