Hallo,
ich habe folgendes Problem: In einer bestimmten Excelzelle steht ein Ausdruck, der grob nach folgendem Muster aufgebaut ist. -A7:6/11
Der Teil vor dem Doppelpunkt interessiert mich nicht und kann ignoriert werden.
Hinter dem Doppelpunkt möchte ich überprüfen, ob dort ausschließlich Ziffern UND ein "/" vorkommen. Wenn dem so ist soll eine Variable auf 1 gesetzt werden, andernfalls (z.B. wenn nach dem Doppelpunkt -A3:X1/L1, also auch ein Buchstabe steht) soll sie auf 0 gesetzt werden.
Durch:
Code: |
arr = Split(Cells(i, 1).Value, ":") |
habe ich die Zelle getrennt.
Theoretisch würde es reichen, wenn ich das arr(1) daraufhin überprüfe, ob das jeweils nächste zeichen eine Ziffer ist (müsste sich mit IsNumeric realisieren lassen.) Wenn das nicht der Fall ist, überprüfen ob das erste nichtnumerische Zeichen ein "/" ist. Genau das ist mein Problem, ich bekomme diese recht simpel aussehende Abfrage nicht hin. Googlen nach "VBA Zeichen vergleichen" oder "VBA überprüfen ob zeichen gleich" haben leider nur Müll zu Tage gefördert.
Ausserdem würde ich diese Abfrage nur ungern über eine extra funktion implementieren, sondern direkt in den normalen Programmcode schreiben.
Liebe Grüße, :-)
|