Microsoft 365 Désactive rune case en modifiant une cellule

  • Initiateur de la discussion Initiateur de la discussion MACx
  • 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 !

MACx

XLDnaute Occasionnel
Bonjour à vous !

Besoin de votre aide svp...

Le but de ma manipulation est le suivant : Décocher à case automatiquement dès que la valeur de la cellule A1 est modifiée.
La valeur de la cellule est contrôlée par le bouton Toupie (à gauche dans a cellule A1).

L'objectif étant de montrer à l'utilisateur que SI la case est décochée, c'est parce que la valeur de la cellule A1 a été modifiée.
Facultatif : Il serait idéal de rendre le bouton ACTUALISER si la case est décochée.

Si vous pouviez SVP m'aider là dessus. J'imagine qu'il faut du code VBA, et je ne suis vraiment pas un spécialiste là dessus mais je sais qu'ici il n'y a jamais d'impossible.

Par avance, merci beaucoup de votre aide et surtout de votre temps dédié.

MACx

1695896914411.png
 
Solution
Bonjour MACx,

J'ai annulé mon message.

Voyez le fichier joint et le code de la feuille :
VB:
Private Sub CommandButton1_Click()
CheckBox1 = True
End Sub

Private Sub SpinButton1_Change()
[A1] = SpinButton1
CheckBox1 = False
End Sub
Les 3 contrôles sont des contrôles ActiveX.

A+
Bonjour job75,

J'ai envie de te répondre "Exactement". La case décochée ne servira qu'à informer que la valeur de A1 a été modifiée.
Contexte: En modifiant la valeur de A1, certaines données changent visuellement (sur le tableau à côté), mais toutes les données et informations reliées à la valeur A1 n'apparaîtront que si on clique sur Actualiser.

Merci de ton aide.

MACx
 
Bonjour MACx,

J'ai annulé mon message.

Voyez le fichier joint et le code de la feuille :
VB:
Private Sub CommandButton1_Click()
CheckBox1 = True
End Sub

Private Sub SpinButton1_Change()
[A1] = SpinButton1
CheckBox1 = False
End Sub
Les 3 contrôles sont des contrôles ActiveX.

A+
 

Pièces jointes

- 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
4
Affichages
243
Retour