Microsoft 365 Mettre ToggleButton à false

  • Initiateur de la discussion Initiateur de la discussion pompaero
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

pompaero

XLDnaute Impliqué
Bonjour le forum,

En cours de construction d'un petit classeur ou j'ai mis un bouton bascule (ToggleButton) qui fonctionne quand je click dessus.
Maintenant j'aimerai à la remise à zéro (bouton remise à zero) de ma feuille pouvoir mettre le bouton bascule à false ainsi que la couleur qui correspond à cette action.

Je tente depuis un moment à faire cela mais n'abouti pas au résultat, c'est pour ça que je viens vous demander de l'aide.
Vous verrez mon code associé au bouton (remise à zéro)

Je joins le classeur qui me sert d'exemple.
Merci à vous par avance.

Cdlt
 

Pièces jointes

Bonsoir pompaero
Bonsoir le Fil ,le Forum
Voilà ce que j'ai modifié dans la procédure " fin_service "
il y avais unToggleButton2 qui n'existe pas et j'ai indiqué le Nom de la feuille "Feuil1" plutôt que la variable "Sh"
VB:
With Feuil1
          .Range("C14,C15,C8") = ""
          .Range("M8") = ""
        If .Range("M8") = "" Then
         With .ToggleButton1
                  .Caption = "Non activé"
                  .Value = False
                 .BackColor = RGB(184, 204, 228) 'bleu gris
         End With
          .Range("M5:M8").Interior.Color = RGB(220, 230, 241) 'bleu gris
        End If
         .Range("A1").Select
    End With
pourquoi mettre ?
Code:
 If .Range("M8") = "" Then
car au dessus tu mets : " .Range("M8") = "" "
Cordialement
jean marie
 
Dernière édition:
Bonsoir, le fil,

Merci de votre retour, toujours agréable de retrouver les gens qui aident..

Après test de vos propositions cela à l'air de fonctionner, je regarde plus tranquillement demain comment je vais adapter à ma macro.
Je reviens vers vous si besoin ou confirmer un bon fonctionnement de ma macro.
Encore merci
A bientôt

Cdlt
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
26
Affichages
2 K
Réponses
13
Affichages
1 K
  • Question Question
Microsoft 365 Liste cascade
Réponses
6
Affichages
1 K
Réponses
1
Affichages
1 K
Retour