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

Activation ou inactivation d'une macro en fonction d'une Valeur

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

T

Titoy

Guest
Bonjour à tous,

Je pense que le titre parle de lui même,

En effet je voudrais rendre active ou inactive ma macro en fonction de la valeur d'une cellule. J'ai appliqué une macro à un bouton qui me permet de supprimé des lignes avec un système de compteur. (Le Bouton inverse permettant d'ajouter des lignes existe également.) Mon problème est que quand j'arrive à 1 si je rappui sur le bouton des lignes qui n'ont pas lieu d'être modifié vont l'être et je voudrais donc désactiver ma Macro quand la valeur 1 est atteinte et la ractiver quand la valleu de la cellule est supérieur à 1.

Exemple ci-joint.

Merci de votre aide,

TITOY
 

Pièces jointes

Re : Activation ou inactivation d'une macro en fonction d'une Valeur

Bonjour à tous,

Peux-tu essayer avec :

Code:
[B][COLOR="Blue"]If Range("D4") < 2 Then Exit Sub[/COLOR][/B]
 Range("D4").Value = Range("D4").Value - 1
    Rows("8:8").Select
    Application.CutCopyMode = False
    Selection.Delete Shift:=xlUp

A+ à tous
 
- 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

D
Réponses
26
Affichages
2 K
D
L
Réponses
22
Affichages
10 K
Lemontine
L
A
Réponses
1
Affichages
898
Akarzen
A
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…