Activer une macro suivant la valeur d'une cellule

[chnook]

Bonjour à tous,

Je souhaiterai savoir comment faire pour qu'une macro s'active dès qu'une certaine valeur apparait dans une certaine cellule.
Illustration :
Je veux que
lorsque ma cellule A:1 affiche "problème de dim."
Alors ma macro intillée "correction" s'active.

Si quelqu'un sait comment faire merci d'avance
Bonne journée

 

[JCGL]

Re : Activer une macro suivant la valeur d'une cellule

Bonjour à tous,

A placer dans le code la feuille :

Private Sub Worksheet_Change(ByVal Target As Range)
If Range("A1") = "problème de dim." Then Call correction
End Sub

A + à tous

 

[Gorfael]

Re : Activer une macro suivant la valeur d'une cellule

Salut chnook et le forum

Je veux que lorsque ma cellule A1 affiche "problème de dim."
Alors ma macro intitulée "correction" s'active.

Juste une question : comment le texte apparaît-il dans la cellule A1 ? Par macro, Formule, format ?
A+

 

[chnook]

Re : Activer une macro suivant la valeur d'une cellule

Avec une fonction logique "si"
c'est à dire que A:1 = si(Qlim_dc<Qmax_dc;"Dim.correcte";"problème de dim.")

 

[Gorfael]

Re : Activer une macro suivant la valeur d'une cellule

Salut chnook et le forum
Petit rappel : on n'est ni télépathe, ni devin, et on n'utilise pas ton fichier !
Faut vraiment t'arracher les infos...

A1 :

= si(Qlim_dc<Qmax_dc;"Dim.correcte";"problème de dim.")

J'en déduit que Qlim_dc et Qmax_dc sont deux cellules nommées.
Dans les modules liés à la/les feuille(s) qui les contien(nen)t, il faut faire la macro de JCGL, en précisant pour A1, la feuille qui la contient : A1 contenant une formule, son changement d'affichage ne déclenche aucune macro. Donc, il faut que ce soit les changements de contenu (pas d'affichage), qui déclenche le contrôle de A1, pour lancement de ton autre macro.
Ou que t'utilise la macro Worksheet_Calculate.
Si tu n'y arrives pas, donnes au minimum à quoi font référence Qlim_dc et Qmax

A+

 

[chnook]

Re : Activer une macro suivant la valeur d'une cellule

Pardon pour le manque d'info.
La macro de JCGL marche du tonnerre. Mais le problème est dès que l'utilisateur entre la valeur de qmax_dc, la fonction "si" la compare alors directement avec Qlim_dc. Or l'utilisateur doit rentrer pas mal de données avant de sortir la valeur de qlim_dc. Uns fois que toutes les données sont rentrées, l'utilisateur est à la Feuille 8 du classeur. Or le message de la macro de JCGL doit s'afficher dans la feuille 3. Est ce que l'on peut créer une macro associer à un bouton ayant comme nom "obtenir le résultat" que l'on place en feuille 8 et qui a pour but de :
1 - afficher la feuille 3 au lieu de la feuille 8
2 - activer la macro de JCGL
???
Est ce que c'est claire ? j'espère que cette fois toutes les infos sont présentes.
Encore merci pour l'aide

 

[Gorfael]

Re : Activer une macro suivant la valeur d'une cellule

Salut chnook et le forum
Je suis pas sûr de comprendre :

Je souhaiterai savoir comment faire pour qu'une macro s'active dès qu'une certaine valeur apparait dans une certaine cellule.

Ça c'est un fonctionnement automatique.

une macro associer à un bouton ayant comme nom "obtenir le résultat" que l'on place en feuille 8 et qui a pour but de :
1 - afficher la feuille 3 au lieu de la feuille 8
2 - activer la macro de JCGL

Ça, c'est un fonctionnement purement manuel !
Tu n'as pas besoin d'une macro automatique
Tu fais juste un bouton qui te lance la macro (clic-droit dessus=>menu contextuel>>Visualiser le code
- tu testes A1 If Range("A1") = "problème de dim." Then Call correction
- tu actives la feuille 8 sheets("Feuil8").activate
A+

 

[chnook]

Re : Activer une macro suivant la valeur d'une cellule

Merci beaucoup pour l'info et l'aide 🙂
Plus qu'à tester