Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

[Résolu] [VBA] Activer/désactiver une macro à l'aide d'un "switch"

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

D

DonBeuBeu

Guest
Bonjour tout l'monde!!!

Petite question, j'ai une macro dans un de mes fichiers excel:

Code:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim cible As Range
Set cible = Range("D4:M41")
If Not Intersect(Target, cible) Is Nothing Then
    If Target.Value = "" Then
    Target.Value = "X"
    ElseIf Target.Value = "X" Then
    Target.ClearContents
    End If
End If
End Sub

Et elle marche à merveille!!! Sauf que je voudrais qu'elle soit effective que si je le souhaite...

Exemple j'aurais un mode "édition", ou la macro est active et je modifie mes cellules;
Et un mode "consultation" ou la macro est désactivée et je peux cliquer sur mes cellules sans en changer le contenu...

En pj le fichier en question (onglet "Réf pour planif")

Merci d'avance!
 

Pièces jointes

Dernière modification par un modérateur:
Re : [VBA] Activer/désactiver une macro à l'aide d'un "switch"

Bonjour
Tu peux ajouter un bouton "case à cocher" dans ton fichier et une condition "If" au début de ta macro au sujet de cette case à cocher.
Dis moi si tu à compris
Bonne chance
 
- 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
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Réponses
4
Affichages
586
Réponses
7
Affichages
829
Réponses
0
Affichages
657
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…