Nogmaals invoeren

[henkievermeer]

Hallo,

Ik heb laatst een vraag gesteld om, letters in rij(B) automatisch te laten opgehogen.
Dat werkt perfect.

Nu echter wil ik ook getallen die automtisch opgehoogd worden

Boormachine A A 0 1
Slijptol A A 0 2
Perstang A A 0 3

Als het A A 9 9 dan
A B 0 1 enz.

Ik heb werkelijk geen idee hoe dit moet of dat het mogelijk is.

Misschien is er iemand die mij helpen kan.

 

[Timshel]

Ik krijg de indruk dat het meest rechter cijfer nooit 0 mag zijn.
Zie bijlage.

 

[henkievermeer]

Timshel

Bedankt voor je reactie.
Het is de bedoeling, dat als ik een gereedschap toevoeg dat er dan automatisch de nummers worden opgehoogd.
als ik een in het userform een nieuw gereedschap aanmaak dat er dan automatisch een nieuw nummer wordt aangemaakt.
de eerste letter is van het soort gereedschap. Die wordt bepaald via de combobox. Dat werkt. Het gaat dus alleen om de cijfers
de tweede mag een A blijven.
Het gaat dus alleen om de cijfers
De derde en vierde moeten iedere keer na invoer met één opgehoogd worden.

A A 0 1
A A 0 2
A A 0 3
enz

Een ander soort gereedschap

B A 0 1
B A 0 2
enz.

Dit tot 99 en dat moet genoeg zijn. Zo krijgt ieder zijn eigen unieke nummer
Meerdere soorten gereedschap dat lukt me wel.

 

[Timshel]

Kijk hier eens naar:

 

[henkievermeer]

Timshel,

Het is hem bijna.
Voor tabblad "gereedschap" werkt het perfect.
Ik zou graag nog als ik in de combobox "PMB" kies, dat het dan in dat tabblad opgehoogd wordt.
Ik denk dat ik zo'n 12 tabbladen krijg.

Ik heb al geprobeerd om in deze regel lIndex = Evaluate("max(if(Gereedschap!B1:B1000=""" & TextBox1 & """,row(1:1000)))")
van tabblad gereedschap een variabele te maken, maar dat lukt niet. Heb je daar ook een oplossing voor?

Henkie

 

[Timshel]

De namen van de tabbladen moeten overeenkomen met de categorieën in tabblad Groep:

 

[henkievermeer]

Timshel,

Voor zover ik heb kunnen testen werkt het perfect.
Voorlopig kan ik weer verder.
Ik zal hem op opgelost.

Bedankt
Henkie