Discussion :

[NELAIN]

Bonjour,

A L AIDE j'utilise le code suivant pour créer des combobox dans ma feuille excel en automatique mais voilà je voudrais modifier aussi les propriétées linkcell, listfillrange, listrows et listwidth mais losque je lance la macro il me crée la première combobox et plante avec "propriété et méthode non généré par cet objet" Quelqu'un aurait il une solution.

merci

cn

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
ActiveSheet.OLEObjects.Add(ClassType:="Forms.ComboBox.1", Link:=False, _ 
DisplayAsIcon:=False, Left:=100, Top:=100, Width:=225, Height:= _ 
97.5).Select
 
with selection 
.linkcell = "H4"
.listfillrange = "intit!a:a"
end with

[NELAIN]

En pemplaçant le code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
with selection 
.linkcell = "H4"
.listfillrange = "intit!a:a"
.listrows=  30
.listwidth = 500
end with

par

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
selection.linkcell = "h4"
selection.listfillrange = "intit!a:a"
selection.listrows=  30
selection.listwidth = 500

il s'avert que c'est les propriétés selection.listrows= 30
selection.listwidth = 500 qui posent pb
?????????????
cn

[decondelite]

Aaaattention: la combobox que tu insère est celle de la "boite à outils contrôles", pas celle de la barre d'outils "formulaires".

[NELAIN]

Désolé mais je ne comprend pas trop en fait lorsque je regarde dans les propriétés des combobox aprés leur création en automatique j'accéde bien à la propriété listrows et listwidth alors pourquoi je ne peux pas paramétrer en vba ?

merci

bonne journée

[decondelite]

Essaie lors de la création d'affecter le résultat de la création à un objet, plutôt que d'effectuer la méthode Select dessus.

Si tu regarde le contenu de Selection avant de lui appliquer des propriétés, tu verras que ça ne correspond pas du tout à ce que tu attends.