VBA Excel, ComboBox initialiseren

[Kanivan]

Ik denk dat een triviaal probleem is, maar ik kan nergens het antwoord vinden.
Ik heb een combobox (CB1) op blad2 van een excel workbook. Ik wil dat als je de workbook opent, dat er 3 waarden in de combobox geplaats worden. Dit kan met CB1.AddItem "a" maar waar moet ik deze code plaatsen? Als ik het bij Worksheet_Open() zet dan weet vba niet wat ik met CB1 bedoel. Hoe kan ik naar een bepaalde combobox op een bebaalde blad verwijzen?

[Tukk]

Kanivan schreef op zaterdag 16 april 2005 @ 13:15:
Ik denk dat een triviaal probleem is, maar ik kan nergens het antwoord vinden.
Ik heb een combobox (CB1) op blad2 van een excel workbook. Ik wil dat als je de workbook opent, dat er 3 waarden in de combobox geplaats worden. Dit kan met CB1.AddItem "a" maar waar moet ik deze code plaatsen? Als ik het bij Worksheet_Open() zet dan weet vba niet wat ik met CB1 bedoel. Hoe kan ik naar een bepaalde combobox op een bebaalde blad verwijzen?

Staat die combox op op de worksheet? Of initialisser je die in de code?
Oftewel, wat doe je, kun je dat beter uitleggen?

[Kanivan]

de combobox staat op een worksheet. Ik wil dat het bijvoorbeeld 3 waarden krijgt: a, b en c
Ik heb de combobox toegevoegd via de werkset besturingselementen.

[Tukk]

Visual Basic:

Private Sub Workbook_Open()
    Sheet1.ComboBox1.AddItem "a"
End Sub

Zit jij niet in Workbook_Open() ipv van Worksheet_Open.
(die laatste bestaat niet)

[Kanivan]

OK het werkt, de juiste code is:

Visual Basic:

Private Sub Workbook_Open()
    Worksheets("Sheet1").ComboBox1.AddItem "a"
End Sub

[ Voor 93% gewijzigd door Kanivan op 16-04-2005 13:52 ]