Wie sortiere ich Spalten automatisch nach Werten in Excel?
Zum Beispiel haben Sie eine Einkaufstabelle wie unten gezeigt. Jetzt möchten Sie, dass die Preisspalte automatisch sortiert wird, wenn Sie neue Zahlen/Preise in diese Spalte eingeben. Wie könnten Sie das lösen? Hier stelle ich ein VBA-Makro vor, das Ihnen hilft, eine bestimmte Spalte in Excel automatisch nach Wert zu sortieren.
Spalte mit VBA automatisch nach Wert sortieren
Spalte mit VBA automatisch nach Wert sortieren
Dieses VBA-Makro sortiert alle Daten in einer bestimmten Spalte automatisch, sobald Sie neue Daten eingeben oder den Wert in der Spalte in Excel ändern.
1. Klicken Sie mit der rechten Maustaste auf den aktuellen Blattnamen in der Blatt Tab-Leisteund dann auf die Schaltfläche Code anzeigen aus dem Kontextmenü.
2. Fügen Sie im sich öffnenden Dialogfeld Microsoft Visual Basic für Anwendung den folgenden VBA-Makrocode in das sich öffnende Fenster ein.
VBA: Spalte automatisch sortieren in Excel
Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
If Not Intersect(Target, Range("B:B")) Is Nothing Then
Range("B1").Sort Key1:=Range("B2"), _
Order1:=xlAscending, Header:=xlYes, _
OrderCustom:=1, MatchCase:=False, _
Orientation:=xlTopToBottom
End If
End Sub
Note:
1) Im obigen VBA-Code, B: B. bedeutet, dass Spalte B automatisch sortiert wird, B1 ist die erste Zelle in Spalte B, B2 ist die zweite Zelle in Spalte B, und Sie können sie je nach Bedarf ändern.
2) Der Ausschnitt Header:=xlJa in der 5. Zeile teilt Excel mit, dass der zu sortierende Bereich eine Kopfzeile hat, sodass die erste Zeile des Bereichs beim Sortieren nicht berücksichtigt wird. Wenn es keine Überschrift gibt, ändern Sie sie bitte in Header:=xlNr; und ändern Schlüssel1:=Bereich("B2") in der 4. Reihe zu Schlüssel1:=Bereich("B1").
3. Kehren Sie dann zum Arbeitsblatt zurück. Wenn Sie eine neue Nummer in die Spalte Preis eingeben oder vorhandene Preise ändern, wird die Spalte Preis automatisch in aufsteigender Reihenfolge sortiert.
Note: Wenn Sie eine neue Zahl in die Spalte „Preis“ eingeben, müssen Sie die Zahl in die erste leere Zelle unter den ursprünglichen Zahlen eingeben. Wenn es leere Zellen zwischen der neu eingegebenen Zahl und den ursprünglichen Zahlen sowie leere Zellen zwischen den ursprünglichen Zahlen gibt, wird diese Spalte nicht automatisch sortiert.
Demo: Spalten automatisch nach Wert mit VBA in Excel sortieren
Einfache Sortierung nach Häufigkeit des Auftretens in Excel
Kutools für Excel Erweiterte Sortierung Das Dienstprogramm unterstützt das schnelle Sortieren von Daten nach Textlänge, Nachname, Absolutwert, Häufigkeit usw. in Excel.
Beste Office-Produktivitätstools
Verbessern Sie Ihre Excel-Kenntnisse mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor. Kutools für Excel bietet über 300 erweiterte Funktionen, um die Produktivität zu steigern und Zeit zu sparen. Klicken Sie hier, um die Funktion zu erhalten, die Sie am meisten benötigen ...
Office Tab Bringt die Oberfläche mit Registerkarten in Office und erleichtert Ihnen die Arbeit erheblich
- Aktivieren Sie das Bearbeiten und Lesen von Registerkarten in Word, Excel und PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters und nicht in neuen Fenstern.
- Steigert Ihre Produktivität um 50 % und reduziert jeden Tag Hunderte von Mausklicks für Sie!