If Mid(Activecell.value,3,1)="T" then msgbox "Drittes Zeichen ist ein T"
Viele Grüße
Bernd
MVP für Microsoft Excel
Excel-Tipps, VBA in 21 Tagen und VBA-Datenbank unter: http://held-office.de
VIELEN DANK!!! :-)
Und das auch noch so superschnell.
Hab es alleine trotz stundenlangem Suchen
einfach nicht gefunden...
Um das 3. Zeichen eines Strings mit VBA zu prüfen, kannst Du die folgende Schritt-für-Schritt-Anleitung befolgen:
Öffne Excel und drücke ALT + F11
, um den VBA-Editor zu öffnen.
Füge ein neues Modul hinzu, indem Du auf "Einfügen" > "Modul" klickst.
Gib den folgenden VBA-Code ein:
Sub CheckThirdCharacter()
If Mid(ActiveCell.Value, 3, 1) = "T" Then
MsgBox "Drittes Zeichen ist ein T"
Else
MsgBox "Drittes Zeichen ist nicht ein T"
End If
End Sub
Schließe den VBA-Editor.
Wähle eine Zelle mit einem String aus und führe das Makro aus, indem Du ALT + F8
drückst und CheckThirdCharacter
auswählst.
Mit diesem einfachen VBA-Code kannst Du das 3. Zeichen in einem String überprüfen.
Fehler: "Typen unverträglich"
Fehler: "Objekt erforderlich"
Falls Du keine VBA verwenden möchtest, kannst Du auch die Funktion MID
direkt in einer Excel-Zelle nutzen:
=MID(A1, 3, 1)
Diese Formel gibt das 3. Zeichen aus der Zelle A1 zurück. Du kannst dann mit einer WENN
-Funktion weiterarbeiten, um das Zeichen zu prüfen:
=WENN(MID(A1, 3, 1)="T"; "Drittes Zeichen ist ein T"; "Drittes Zeichen ist nicht ein T")
Hier sind einige praktische Beispiele, wie Du den VBA-Code oder die Excel-Formel nutzen kannst:
Beispiel mit VBA:
Beispiel mit Excel-Formel:
MID
und VBA zu bekommen.1. Kann ich auch andere Zeichen als das 3. Zeichen überprüfen?
Ja, Du kannst die Mid
-Funktion anpassen, um jedes beliebige Zeichen in einem String zu überprüfen, indem Du den zweiten Parameter änderst.
2. Funktioniert dieser VBA-Code in allen Excel-Versionen? Ja, der Code ist kompatibel mit den meisten Excel-Versionen, die VBA unterstützen. Stelle sicher, dass Du die Makros aktiviert hast.
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen