Rechercher : dans
Par :

Désactiver bouton Excel avec macro

Dernière réponse le 19 fév 2008 à 09:55:53 GV, le 19 fév 2008 à 09:20:22 
 Signaler ce message aux modérateurs

Bonjour,

Voici mon pb :

j'ai créé des boutons dans ma feuille Excel qui sont reliés à des macros.

Il y a 3 boutons, ce que je veux c'est savoir comment désactiver et griser un bouton lorsqu'on a cliqué dessus (en langage VBA 6.3).

Pouvez-vous m'aider?

Merci d'avance

Configuration: Windows XP
Firefox 2.0.0.12

Meilleures réponses pour « désactiver bouton Excel avec macro » dans :
Télécharger MOREFUNC (Macro complémentaire EXCEL) VoirMorefunc est une macro complémentaire proposant 67 nouvelles fonctions de feuille de calcul pour Excel. Ces fonctions sont compatibles avec Excel 95 à 2007. Elles ne sont pas portables sur d'autres plate-formes que Windows, ni sur d'autres...
Exécuter une macro VoirExécuter une macro Excel et Calc proposent plusieurs façons d’exécuter une macro : en la sélectionnant dans une liste, dans la boîte de dialogue Macro ; par un raccourci clavier ; en l’attachant à un bouton de la barre d’outils ; ...

1

booddha, le 19 fév 2008 à 09:21:59

Bonjour,

Voici mon pb :

j'ai créé des boutons dans ma feuille Excel qui sont reliés à des macros.<<-----------Quel Excel?

Il y a 3 boutons, ce que je veux c'est savoir comment désactiver et griser un bouton lorsqu'on a cliqué dessus (en langage VBA 6.3).

Pouvez-vous m'aider?

Merci d'avance

Répondre à booddha

2

GV, le 19 fév 2008 à 09:22:46
  • +2

Excel 2003

Répondre à GV

3

booddha, le 19 fév 2008 à 09:28:46

Désactiver un bouton et le griser :

Sub ChangeButton()
dim bt As Button
Set bt = activeworkbook.worksheets("Sheet1").Buttons("Button 1")
if bt.Enabled = true then
bt.Enabled = false
bt.Font.Color = RGB(255, 251, 240)
Else
bt.Enabled = true
bt.Font.Color = RGB(0, 0, 0)
end if
end Sub

Répondre à booddha

4

GV, le 19 fév 2008 à 09:30:57

Merci beaucoup je vais tester

Répondre à GV

5

GV, le 19 fév 2008 à 09:36:57
  • +1

En fait, pour que mon 1er bouton soit désactivé et grisé, il faut que l'utilisateur clic sur ce 1er bouton puis sur un second et seulement à partir de ce moment là, le 1er bouton doit être désactivé et grisé.

J'ai fait mon code sur mon 1er bouton,, puis mon code sur le 2ème bouton et à la fin de ce 2ème code j'appelle la fonction changebutton (qui doit donc désactiver et griser le 1er bouton) mais ça ne marche pas!

Il me met un message de débogage ou de fin

Répondre à GV

6

 GV, le 19 fév 2008 à 09:55:53

C'est bon j'ai trouvé, comme je protège mes feuilles et mes boutons, je n'avais pas placé la commande au bon endroit ;-)

merci beaucoup de votre aide

Répondre à GV