combox

[speng002]

Mag ik jullie vriendelijk om hulp vragen alstublieft?

Ik heb bij activeX-besturingselementen een combo box gemaakt
Combobox1
Bij eigenschapen listFillRange= AA14:AA20 ingevuld
Nu probeer ik met een macro mijn keuze in Range("A1") te zetten
ik probeer dit met listindex maar dit lukt niet
kunnen jullie mij hier mee helpen om het werkend te krijgen
dit is de code waar ik mee bezig ben

fileservice:
If listbox1.ListIndex = 1 Then Range("A1") = "dick"
If ComboBox1.ListIndex = 1 Then Range("A1") = "epots"
GoTo cancel

Alvast bedankt dick

 

[zapatr]

Krijg je de foutmelding
"Fout 438 tijdens uitvoering.
Deze eigenschap of methode wordt niet ondersteund door dit object" ?

 

[OctaFish]

Wat heeft dit met websites maken te maken? Ik zie een typische Excelvraag?

 

[bron]

Vraag is verplaatst naar Excel

 

[lam201]

Misschien zo

Private Sub ComboBox1_Change()

Range("A1") = ComboBox1.Value

End Sub