Combobox figée ou grisée

[mormox]

Bonjour à tous,

J'ai 10 combobox sur une feuille excel et je souhaiterai qu'elles soient remplies dans un ordre précis. J'aurai voulu savoir s'il était possible de griser ou de figer les combobox en attendant qu'une valeur dans la précédente soit remplie.

Merci d'avance pour vos réponses,

Cordialement.

 

[Guest]

Re : Combobox figée ou grisée

Bonjour,

exemple avec un userform et 2 combobox

Private Sub ComboBox1_Change()
[B]ComboBox2.Enabled = ComboBox1.ListIndex > -1
[/B]End Sub
Private Sub UserForm_Initialize()
With ComboBox1
    .AddItem "toto"
    .AddItem "tata"
    .AddItem "titi"
End With
[B]ComboBox2.Enabled = False
[/B]End Sub

A+

 

[mormox]

Re : Combobox figée ou grisée

Bonjour,

Merci pour la rapidité de votre réponse,
dans mon cas je n'ai pas d'usf, donc j'ai simplement mis :

Private Sub ComboBox1_Change()
ComboBox2.Enabled = ComboBox1.ListIndex > -1
End Sub

et ça a très bien fonctionné, il suffit que je liste toutes les comboboxs suivantes.

Par contre je ne comprends pas très bien la partie ci dessous du code;😕 à quoi ça sert exactement puisque la condition est déjà donnée dans la combobox1... Je précise je n'ai jamais fait d'USF, c'est peut être dû à ça..

Private Sub UserForm_Initialize()
ComboBox2.Enabled = False
End Sub

Encore merci !

 

[Guest]

Re : Combobox figée ou grisée

Re,

il faut préciser dans tes demandes d'où viennent les contrôles dont tu parles.

Si je comprend bien se sont des combobox de la barre d'outils Contrôles posés sur une feuille de calcul.

Private Sub UserForm_Initialize()
ComboBox2.Enabled = False
End Sub

Ne concerne que les userforms. C'est pour initialiser les contrôles du userform. Mais comme tu n'en n'as pas....

A+

 

[mormox]

Re : Combobox figée ou grisée

Ok merci oui ce sont bien des combobox de la barre d'outils contrôle...

Dans le cas où je souhaite qu'une combobox soit active que si la précédente l'est et qu'en plus de cela, que l'utilisateur est cliqué sur un bouton sur lequel je lui demande de cliquer ?

Je vais tester un truc du genre

ComboBox1.Enabled = CommandButton1.Activate

et vous dire si ça fonctionne,

Encore merci

EDIT : NON ça ne fonctionne pas... des solutions ?

 

[skoobi]

Re : Combobox figée ou grisée

Bonjour mormox,
Salut Hasco 🙂🙂!

Comme Hasco doit donner son coup de fourchette 😀, il faut mettre le code dans le bouton:

Private Sub CommandButton1_Click()
ComboBox2.Enabled = ComboBox1.ListIndex > -1
End Sub

 

[mormox]

Re : Combobox figée ou grisée

LOL c'est vrai que vu comme ça c'est logique 😀...

Encore merci à tous pour votre aide !

Bon après midi ! 😀