Totalité command button enabled=trueRésolu

Question

Salut &#224; tous et &#224; toutes !!!! (Eh oui il y en a aussi !!!)



Voil&#224; mon probl&#232;me:



J'ai une soixantaine de command button  dans mon projet vba (donc sur un feuille excel)

et je les enabled=false au fur et &#224; mesure des choix effectu&#233;s



Je voudrais les rendre tous enbled=true sans passer par 

commandbutton1.enabled=true

commandbutton2.enabled=true

...

...

...

commandbutton58.enabled=true

commandbutton59.enabled=true ....................



Y-a-il un moyen ?

car avec

For i = 1 To 58

CommandButton& i.Enabled = True

Next i

&#231;a bug grave

linasteph · Accepted Answer

voil&#224; une solution qui fonctionne

For i = 1 To 58

 Worksheets(1).OLEObjects("CommandButton" & i).Enabled = False

Next i

cs_Algade · Answer

Y a une erreur de syntaxe dans ton code qui bug

Faux :
For i = 1 To 58
CommandButton& i.Enabled = True
Next i

Vrai:
For i = 1 To 58
CommandButton(i).Enabled = True
Next i

linasteph · Answer

n'est-il pas possible de mettre un m&#234;me nom pour tous tes boutons par
exemple CmdButton en attribuant &#224; chacun un num&#233;ro d'index.



Comme &#231;a apr&#232;s tu peux faire 

 For i = 1 To 58

 CmdButton(i).Enabled = True

 Next i

linasteph · Answer

Apr&#232;s v&#233;rification je n'ai pas trouv&#233; le moyen de mettre un index. 

Je vais chercher autre chose

batao · Answer

Faut que je d&#233;clare mon OLEObjects avant ou bien ?

batao · Answer

&#231;a marche merci beaucoup

Bonne journ&#233;e pas de trop de prog fa&#238;tes gaffe

:)

Batao

Totalité command button enabled=true

6 réponses

Discussions similaires