Gegevens toevoegen aan werkblad met userform

[patrickje]

Ik heb een userform gemaakt met daarin een tekstbox en een combobox.

In het tekstbox vul ik de waarde in die ik wil toevoegen.
In de combobox selecteer ik het blad waar het moet worden weggescheven.

Hier loop ik vast.

Wie kan me helpen.

Dus in de combobox heb ik de waardes blad 1 blad 2 enz.
Deze staan gelijk aan de werkbladen.

Kortom de combobox geeft aan welk blad daarna gewoon toevoegen in de eerste lege cel.

 

[HSV]

Bv.

private sub combobox1_change()
sheets(combobox1.value).cells(rows.count, 1).end(xlup).offset(1) = textbox1.value
end sub

 

[patrickje]

Dank je voor je reactie

Werkt perfect