Filtern Sie Werte nach dem ersten Buchstaben oder dem letzten Zeichen mit der Filterfunktion
Mit der Filterfunktion in Excel können Sie Werte nach Anfangsbuchstaben oder letzten Zeichen filtern.
1. Wählen Sie die gesamte Spalte aus, in der Sie Werte nach dem ersten Buchstaben oder dem letzten Zeichen filtern möchten, und klicken Sie dann auf Datum > Filter. Siehe Screenshot:
2. Nun wird in der ersten Zelle der ausgewählten Spalte ein kleines Dropdown-Symbol angezeigt. Bitte klicken Sie auf das Dropdown-Symbol> Textfilter > Beginnt mit / Endet mit. Siehe Screenshot:
Notizen:
1). Wenn Sie Werte nach dem ersten Buchstaben filtern möchten, klicken Sie bitte auf Beginnt mit Option in Schritt 2. Beim Auftauchen Benutzerdefinierter AutoFilter Geben Sie im Dialogfeld den ersten Buchstaben, nach dem Sie filtern möchten, in das leere Feld ein, nachdem Sie mit begonnen haben, und klicken Sie schließlich auf OK .
Zum Beispiel geben Sie den Buchstaben „a”In das Feld, nachdem Sie auf das geklickt haben OK Schaltfläche, alle Werte beginnen mit dem Buchstaben "a" werden sofort herausgefiltert.
2). Um Werte nach dem letzten Zeichen zu filtern, klicken Sie bitte auf Endet mit Option in Schritt 2. Und im Auftauchen Benutzerdefinierter AutoFilter Geben Sie im Dialogfeld das letzte Zeichen, nach dem Sie alle Werte filtern möchten, in das leere Feld nach dem Ende mit ein und klicken Sie schließlich auf OK Taste. Siehe Screenshot:
Nach einem Klick auf die OK Schaltfläche, alle Werte, die mit dem angegebenen Zeichen enden, werden sofort herausgefiltert.
Filtern Sie die Werte nach dem ersten Buchstaben oder dem letzten Zeichen mit VBA-Code
Sie können VBA-Code auch verwenden, um Werte nach dem ersten Buchstaben oder dem letzten Zeichen in Excel zu filtern.
1. Drücken Sie Andere + F11 Tasten gleichzeitig zum Öffnen der Microsoft Visual Basic-Anwendung Fenster.
2. In dem Microsoft Visual Basic-Anwendung Klicken Sie im Fenster Insert > Modul. Kopieren Sie dann den folgenden Code und fügen Sie ihn in das Modulfenster ein.
VBA-Code: Filtern nach erstem Buchstaben oder letztem Zeichen
Sub filterbyletter()
Dim rng01 As Range
Set rng01 = [A1:A8]
rng01.Parent.AutoFilterMode = False
rng01.Columns(1).AutoFilter Field: = 1, Criteria1: = "=a*", VisibleDropDown: = False
End Sub
Anmerkungen:
1). Im Code A1: A8 ist der Spaltenbereich mit Werten, die Sie filtern möchten. Sie können es je nach Bedarf ändern.
2). a* bedeutet, dass Sie alle Werte filtern, beginnend mit Buchstabe a. Und wenn Sie alle Werte filtern möchten, die mit dem Zeichen a enden, ändern Sie dies bitte a* zu *a.
3). Drücken Sie F5 Schlüssel zum Ausführen des Codes. Und die Werte, die die Filterkriterien erfüllen, werden sofort herausgefiltert.
4). Nachdem Sie diesen Code ausgeführt haben, können Sie den Filter durch Klicken löschen Datum > Filter. Siehe Screenshot: