een vraag waarop een snel antwoord is...

[Gerald Baalhuis]

Ik ben al ff aan het speuren, maar de zoekfunctie is op dit moment zeer traag....

Ik heb een userform met o.a. 1 listbox. Hieruit kan de keus gemaakt worden uit de cijfers 1 t/m 5. Hoe krijg ik nu gegevens vanuit 5 cellen van één van de tabbladen in die listbox?

Gerald

 

[Demeter]

Probeer dit eens:

Private Sub UserForm_Initialize()

    With cboMedewerker 'naam listbox
        .RowSource = "admin-paneel!B6:B12" 'bereik wat je wilt invoeren
    End With
    cboMedewerker.Value = "Kies Medewerker" 

End Sub

en voor handmatig en een niet dynamisch bereik:

Private Sub UserForm_Initialize()    

With cboProject 'naam listbox
        .AddItem "Project 1" 'deze kan je verandren in wat jij wilt laten zien
        .AddItem "Project 2"
        .AddItem "Project 3"
        .AddItem "Project 4"
        .AddItem "Project 5"
    End With
    cboProject.Value = "Kies te verwijderen project"

End Sub

Groet,
Ferenc

 

[Spiderman]

Hoi Gerald Baalhuis,

Of anders op deze manier: (zie bijlage)

@Demeter
Een klein puntje op je code. Probeer de naam van een listbox niet te laten beginnen met cbo maar met lst. Wordt bij grotere projecten anders behoorlijk verwarrend