Code voor range in Combox?

[wat]

Weet iemand de code voor het een range in een combobox die in een userform staat.
Ik wil graag dat kolom A uit een andere file de range wordt voor combobox1.
Dan de tweede vraag : Deze combobox moet daarna weer comuniceren met label 1. In het label moet de waarde van de zelfde rij uit kolom B komen te staan.

Kan iemand mij helpen.

groet,

Wat

 

[Guus2005]

Wat bedoel je met range?
Als je een range wil selecteren moet je een listbox nemen.

 

[wat]

Loop gebruikt om range te importeren in Combobox.

Uit een lijst met nummer en titel wilde ik of de titel in de éne combobox en het nummer in de andere combobox.
Ik heb nu een loop gebruikt om dit te realiseren maar is er ook een gewone code voor?

Nu gebruite Macro:

ComboBox2 = ""
Dim strXX As String
Frame2.Visible = True
Frame3.Visible = False

'open workbook

Windows("datasheet voor menu.xls").Activate
Sheets("A").Select


'sorteren op nummer

Range("A1:C1").Select
Range(Selection, Selection.End(xlDown)).Select

Selection.Sort Key1:=Range("A1"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
Range("B1").Select

'nummers inporteren in combobox

Do Until ActiveCell = ""

strXX = ActiveCell.Text

ComboBox1.AddItem strXX

ActiveCell.Offset(1, 0).Select

Loop

Windows("HFD Menu.xls").Activate
Range("Q20").Select

End Sub

 

[Guus2005]

Oooh, Excel VBA...

Oke, je gebruikt dus excel. Had ik niet meteen door. Wordt er niet makkelijker van. Kan je een voorbeeldje neerzetten?

 

[wat]

Voorbeeld?

Is de code hierboven genoemd niet voorbeeld genoeg? Zoniet wat had je gewenst.
Het graat trouwens wel om een combobox gebruikt in een userform.

groet,

wat

 

[Guus2005]

Ik bedoelde een spreadsheet met wat dummy data. Is wat eenvoudiger mee te spelen.

 

[wat]

geen dummy geen spreadsheet leverbaar.

Er zijn te veel bedrijfsgegevens aan deze sheet gekoppeld om dit door te sturen.
Tevens heb ik mijn range al wel in de combobox staan met de eerder genoemde loop.
Ik zou er niet te veel energie in gaan steken. Een code zou handig zijn voor een volgende keer maar voor dit moment niet meer noodzakelijk.:thumb:

groet,

Wat

 

[riks]

Combobox vullen

Ik heb een voorbeeldbestandje gemaakt waar 2 comboboxen gevuld worden vanaf een spreadsheet.

Misschien helpt dit.

Succes Riks. :thumb: