Hallo,
in einer Mappe1, Tabelle1, habe ich in Spalte A alphanumerische Bezeichnungen, z.B. S911B, ABC, S230TD12X usw.. Jeder Buchstabe und jede Ziffer stellt eine Ebene dar.
Im ersten Schritt möchte ich feststellen, wie viele Ebenen der jeweilige String hat. Eine Besonderheit gibt es: Folgen drei Ziffern aufeinander, zählen diese als eine Ebene". ABC hat somit 3 Ebenen, S911B ebenso, weil drei Ziffern als eine Ebene zählen. Mehr als drei Ziffern in Folge gibt es nicht.
Diese Anzahl wird als Zahl in Spalte B übertragen.
Im zweiten Schritt soll der String bis zur jeweiligen Ebene "zerlegt" und in die Folgespalten übertragen werden. Einträge erfolgen nur bis zur sechsten Stufe bzw. Ebene.
Das Ergebnis für den String S911B sieht so aus:
Spalte B: 3 (Anzahl Ebenen)
Spalte C: S (Ebene 1)
Spalte D: S911 (Ebene 2)
Spalte E: S911B (Ebene 3)
(mehr Ebenen hat dieser String nicht).
Vielleicht wird es verständlicher mit der beigefügten Datei. Für eine Idee, wie ich diese Ebenen per VBA ermitteln kann, wäre ich sehr dankbar.
Grüße, Constantin
https://www.herber.de/bbs/user/97143.xlsx