Dropdown VBA userform

[patrixweb]

Goedendag experts,

Vandaag heb ik geprobeerd om een klantenbestand te maken m.b.v. een userform. Ik kom een heel eind heen met voorbeelden en enige zelfkennis. Echter krijg ik het maar niet voor elkaar om de gekozen waarde van de dropdown op te slaan in het tabblad. Heb ik een codering foutief of mis ik iets, ik heb mij blind gestaard daarom doe ik nu een beroep op jullie.

Ik heb een voorbeeld toegevoegd.

Hopelijk kunnen jullie mij helpen.

Bij voorbaat dank voor een reactie.

Met vriendelijke groet,
Patrick

 

[SjonR]

zo?

Private Sub cmd_add_Click()
Sheets("Blad2").Cells(Sheets("Blad2").Range("B" & Rows.Count).End(xlUp).Row + 1, 2) = CB_letter.Value
End Sub

 

[patrixweb]

zo?

Private Sub cmd_add_Click()
Sheets("Blad2").Cells(Sheets("Blad2").Range("B" & Rows.Count).End(xlUp).Row + 1, 2) = CB_letter.Value
End Sub

Sorry, ik heb een verkeerde bijlage geplaatst De juist staat er nu bij.

 

[Enigmasmurf]

Het zou wel eens een heel banale kwestie kunnen zijn.
In "CMB_01_Click()" staat o.a. ".Cells(iRow, 1).Resize(, 19)..." maar er zijn 29 waarden weg te schrijven...

 

[patrixweb]

Het zou wel eens een heel banale kwestie kunnen zijn.
In "CMB_01_Click()" staat o.a. ".Cells(iRow, 1).Resize(, 19)..." maar er zijn 29 waarden weg te schrijven...

NOU!!! Inderdaad....dat is hem! Super bedankt!