Discussion :

[thierryyyyyyy]

Bonjour,

J'ai un soucis avec ce "combobox.enabled", il ne désactive pas totalement mes combobox, je veux dire qu'il ne désactive pas les appels aux combobox_change

Voici le code de ma macro Excel (commenté pour que vous vous y retrouviez):

Code :

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

1
2
3
4
5
6
7
8
'sélectionne mes combobox
ActiveSheet.Shapes.Range(Array("fichier1","fichier2","fichier3")).Select
' ... les désactive
Selection.Enabled = False
'modifie les listes de valeurs qui remplissent mes combobox
Range("A1:Z200").ClearContents
Range("A11").FormulaR1C1 = "a"
....

et là, je vous le donne dans le mille ! j'ai une erreur dans mon "fichier1_Change()"

J'ai vérifié la propriété "enabled", et j'ai ainsi pu contourner le pb, mais je ne trouve ca pas beau du tout.
Bref, voici comment je contourne le pb :
If Not combobox.Enabled Then Exit Sub

Je cherche un moyen de vraiment désactiver mes combobox. Une idée ?

[ouskel'n'or]

Tu as plusieurs solutions pour détourner le pb esthétique des "combos.enabled = false"
Tu déclares un boolean en public en tête du code de l'userform
Dim Permis as boolean
Dans userform_initialize tu mets
...Permis = true
quand tu ne veux plus que tes combos se mettent à jour, tu mets
...Permis = false
et dans chaque change de tes combos, tu mets
Private sub LeComboDéfendu_Change()
...if not permis then exit sub
...
Si je ne mets pas les balises code, c'est parce que cette "solution" me gène un peu
Ma solution serait plus radicale

Code :

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

LeCombo.visible = false