Hallo Rudi, liebe User und VBA-Profis!
Bitte nochmals um HILFE!
Ich habe am 6.12.2013 diesen Beitrag geschrieben:
Ich habe wieder mal eine Aufgabe in Excel, die ich nicht lösen kann.
Es geht um eine 8-stellige Nummer, die aus 3 "Gruppen" besteht.
Die erste Gruppe ist 3-stellig und soll aus einem Auswahlfeld (Kombinationsfeld aus fixer Liste) in eine Excel-Zelle eingefügt werden.
Die zweite Gruppe ist 1-stellig und soll ebenfalls aus einem Auswahlfeld (Kombinationsfeld aus fixer Liste) in die selbe Excel-Zelle an die ersten 3 Stellen angefügt werden.
Die dritte Gruppe ist 4-stellig und eine laufende Nummer beginnend mit 0001, 0002, usw. bis irgendwann die letztmögliche Nummer 9999 erstellt wird.
Der nächste Nummerneintrag soll unter die Zelle der zuletzt erstellte 8-stellige Nummer erfolgen.
Jetzt kommt noch etwas ganz Wichtiges zur 4. Stelle der Nummer:
Diese Stelle kann 3 Werte annehmen, nämlich 4,5 oder 6.
Für JEDE dieser 3 möglichen Werte soll die dritte Gruppe bestehend aus 4 Ziffern wie oben beschrieben mit 0001 beginnen und irgendwann bei 9999 enden!
Die gesamte 8-stellige Zahl soll dann in die nächste Zeile eingetragen werden, nachdem vom User die 4. Stelle aus der Liste gewählt worden ist. Kann aber auch nach einem Buttonklick sein, wenn das einfacher zu programmieren ist.
Als Beispiel schicke ich hoffentlich zur Verdeutlichung ein Excel-Beispiel mit.
Ich hoffe du, ihr könnt mir hier ein VBA-Skript dazu senden, den ich bin nach wie vor kein VBA-Profi.
Danke im Voraus!
Liebe Grüße
Helmut
https://www.herber.de/bbs/user/88395.xlsx
Ich habe auch eine Lösung erhalten, die funktioniert, aber nicht so ganz, wie ich benötige.
2 offene Fragen:
Wie muss das Script aussehen, wenn in der Zelle A3 noch keine Zahl steht, ich also mit einem "leeren" Sheet bezüglich der generierten Nummern beginnen will!?
Wie gehört das Script abgeändert, wenn in den beiden Listen Werte hinzugefügt werden, dass diese auch in den Auswahlfeldern verfügbar sind!?
Herzlichen Dank im Voraus!
LG
Helmut