Informatie uit UserForm1 onthouden en automatisch nummeren

[r3000]

Mijn bedoeling is:

1) Info invoeren in UserForm1;
2) Keuze maken uit Listbox in UserFrom2;
3) Eerste lege cel zoeken op Blad in, zoeken vanaf cel C8;
4) Daarin automatisch doornummeren;
5) Gegevens invoeren.

Zie bijgaand voorbeeld. Bekijk bijlage SAMPLE1.xls

Ik heb in Excel alvast wat gegevens ingevoerd als voorbeeld.

Bij voorbaat dank!!

 

[Janzwart]

Zie bijlage (ik heb de 2 formulieren samengevoegd)

Bekijk bijlage SAMPLE1(jz).xls

 

[r3000]

Jan, Bedankt voor de snelle reactie!

Twee probleempjes:

1) Als er nog helemaal geen waarde ingevuld is, wat normaal de praktijk is, dan krijg je een foutmelding (zie aangepast voorbeeld in de bijlage) Bekijk bijlage SAMPLE1(jz) - rev 1.xls

2) Het bestandje dat ik heb gemaakt is slechts ter illustratie. Wat ik graag wil weten, is hoe je in VBA laat onthouden wat er in UserForm1 is ingevuld.
Daarom had ik in eerste instantie, bewust 2 UserForms aangemaakt.

Ik wacht je reactie even af. :thumb:

 

[Janzwart]

Jou 2 problemen zijn met volgende voorbeeld opgelost.

De uitleg staat in de macro.

Bekijk bijlage SAMPLE1(jz) - rev 2.xls