Wie findet man die Position des ersten Kleinbuchstabens in Textzeichenfolgen?
Wenn Sie eine Liste von Textzeichenfolgen haben, die sowohl Groß- als auch Kleinbuchstaben enthalten, möchten Sie nun wissen, an welcher Stelle der erste Kleinbuchstabe in einem Excel-Arbeitsblatt steht. Wie könnten Sie das Ergebnis schnell erhalten, ohne sie einzeln zu zählen?
Finden Sie die Position des ersten Kleinbuchstabens in Textzeichenfolgen mit einer Array-Formel
Finden Sie die Position des ersten Kleinbuchstabens in Textzeichenfolgen mit einer Array-Formel
Sie können die folgende Array-Formel anwenden, um die Position des ersten Kleinbuchstabens in den Textzeichenfolgen zu erhalten. Gehen Sie dazu wie folgt vor:
Geben Sie diese Formel ein: =MATCH(1,IF(ABS(CODE(MID(A2,ROW(INDIRECT("1:"&LEN(A2))),1))-109.5)<=12.5,1),0) in eine leere Zelle, in der Sie das Ergebnis erhalten möchten, und drücken Sie dann gleichzeitig die Tasten Strg + Umschalt + Eingabetaste, um das erste Ergebnis zu erhalten. Ziehen Sie dann den Ausfüllkästchen nach unten in die Zellen, auf die Sie diese Formel anwenden möchten. Siehe Screenshot:
Finden Sie die Position des ersten Kleinbuchstabens in Textzeichenfolgen mit einer benutzerdefinierten Funktion
Sie können diese Aufgabe auch mit der folgenden benutzerdefinierten Funktion abschließen. Gehen Sie dazu wie folgt vor:
1. Halten Sie die Tasten ALT + F11 gedrückt, um das Fenster Microsoft Visual Basic for Applications zu öffnen.
2. Klicken Sie auf Einfügen > Modul, und fügen Sie das folgende Makro im Modulfenster ein.
Function Getlower(rin As Range) As Long
Dim x As String, c As String, j As Long
Findlower = 0
v = rin.Text
L = Len(v)
For j = 1 To L
If Mid(v, j, 1) Like "[a-z]" Then
Getlower = j
Exit Function
End If
Next j
End Function
3. Speichern und schließen Sie dann dieses Codefenster, gehen Sie zurück zum Arbeitsblatt, und geben Sie diese Formel ein: =getlower(A2). in eine leere Zelle, und ziehen Sie dann den Ausfüllkästchen nach unten, um diese Formel auszufüllen. Die Position des ersten Kleinbuchstabens in jeder Zelle wurde extrahiert. Siehe Screenshot:
Beste Büroproduktivitätswerkzeuge
Verbessern Sie Ihre Excel-Fähigkeiten mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor. Kutools für Excel bietet über300 erweiterte Funktionen zur Steigerung der Produktivität und Zeitersparnis. Klicken Sie hier, um die Funktion zu erhalten, die Sie am meisten benötigen...
Office Tab bringt eine Registerkartenoberfläche zu Office und macht Ihre Arbeit viel einfacher
- Aktivieren Sie die Bearbeitung und das Lesen mit Registerkarten in Word, Excel, PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters, anstatt in neuen Fenstern.
- Steigert Ihre Produktivität um50 % und reduziert täglich hunderte von Mausklicks für Sie!