Gegevens uit Userform halen met VBA

[HJ25]

Hallo,

ik heb via Userforms het e.e.a. gemaakt waarbij er een aantal invoervelden zijn. Nu wil ik dat wanneer ik op een knop druk met de naam "Invoeren" dat de vba code in het tabblad "Planningsoverzicht" kijkt wat de eerste lege rij is. Hier moeten dan in de eerste cel de gegevens van textbox1 geplaatst worden, in de tweede cel de gegevens van textbox2 en in de derde cel de gegevens van textbox 3. Iemand een idee of een begin van deze vba code waarmee dat kan?

 

[Niels28]

Sub invoeren_click()
With Sheets("Planningsoverzicht")
.Cells(Rows.Count, 1).End(xlUp).Offset(1).Resize(1, 3).Value = Array(textbox1.Value, textbox2.Value, textbox3.Value)
End With
End Sub

Niels

 

[HJ25]

Helemaal top! Bedankt!! Weet je toevallig ook een code die ik achter TextBox1 kan plaatsen waarbij gekeken wordt of ListBox2 "Nee" is dat dan TextBox1 automatisch N.v.t. wordt? Of dat Textbox1 niet meer ingevuld kan worden?

 

[Niels28]

Die komt niet achter textbox1 maar achter de listbox
zie voorbeeldje

Bekijk bijlage listbox.xlsm

Niels

 

[Niels28]

:evil: je had wel even mogen melden dat deze vraag al is beantwoordt in een ander topic.

Niels