besturingselementen_excel

[tomkruizinga]

Hallo,

Ik ben aan het oefenen met besturingselementen.
nu krijg ik allen netjes in een 'Userform', krijg het alleen niet voor elkaar om de programmacode goed te krijgen.
het is de bedoeling dat er in dit geval ingevuld wordt en als er op 'OK' geklikt wordt dat de gegevens dan in het tabblad komen.

Kan iemand mij hierbij helpen.


Met vriendelijke groet;

Tom Kruizinga

 

[carloschouw]

Je code is niet goed ingedeeld, zie dit voorbeeld

 

[tomkruizinga]

Hallo,
Hier nog een vervolgvraag,
Ik zou graag een "zoekopdracht" in de Userform willen hebben.
Ofwel, in userform "artikelnummer" zou een keuze(dropbox) moeten zijn. (vanuit tabblad Lijst1)

dan zou hij bij omschrijving de juiste omschrijving moeten weergeven( vert.zoeken in tabblad lijst1?)

Kan iemand mij hierbij helpen, kom er niet helemaal uit.

Met vriendelijke groet;
Tom Kruizinga

 

[emields]

bedoel je zoiets?

 

[HSV]

Je hoeft niet te zoeken of gegevens op te halen als je alle gegevens in combobox2 plaatst.

En de combobox2_change() is geen sub maar een private Sub.

Private Sub Userform_Initialize()
 ComboBox1.List = Array("Artikel", "Vries", "Emballage")
 ComboBox2.List = Sheets("Lijst1").ListObjects(1).DataBodyRange.Value
End Sub

[COLOR=#0000ff]Private[/COLOR] Sub ComboBox2_Change()
 TextBox4 = ComboBox2.Column(1)
 TextBox3 = ComboBox2.Column(2)
End Sub

 

[tomkruizinga]

Hoi Hoi,

Super bedankt voor het reageren.
Ik begin het al steeds beter te snappen, erg interessant, wellicht ga ik ooit eens een cursus volgen.
in het volgende bestand heb ik bijna wat ik wil.
echter bij artikelnummer (lijst 1) moet ik een keuze maken door middel van scrollen.
graag zou ik gewoon het artikelnummer typen en dat hij dan dezelfde functie behoud (nl. omschrijving +loc toevoegen)

Waarschijnlijk iets makkelijks maar kom er even niet uit.
Kan iemand mij hierbij helpen.

Tom Kruizinga