XL 2013 Macro lorsque la valeur d'une cellule calculée est supérieur à une autre

T

thebenoit59

XLDnaute Accro

• 2 Mars 2016

• #2

Re : Macro lorsque la valeur d'une cellule calculée est supérieur à une autre

Bonjour Tom801282.
Sans te dire de bêtise, il me semble que ce n'est pas possible avec des calculs automatiques.
Il faudrait que les calculs soit en mode manuel pour que nous puissions déclencher une procédure.
Mais peut-être ai-je tord.

 

Vote positif 0 Vote négatif

youky(BJ)

XLDnaute Barbatruc

• 2 Mars 2016

• #3

Re : Macro lorsque la valeur d'une cellule calculée est supérieur à une autre

Bienvenu TOM,
Il faut jouer avec l'événement sur la Sheet,
Fait un click sur l'onglet Feuil1 en bas avec le bouton droit de la souris, choisit "Visualiser le code"
copie ceci

Private Sub Worksheet_Calculate()
If [B3] > [B5] Then macro1
End Sub

A savoir ici c'est en Calculate que la macro1 sera lancée.
Tu as différent choix que tu verras en combobox en haut à droite de la fenêtre du code.

Attention aussi si macro1 écrit des données dans l'onglet le Calculate sera de nouveau exécuté, pour éviter cela on utilise

Application.EnableEvents = False
'écriture dans l'onglet
Application.EnableEvents = True

cela pour neutraliser l'événement
Bonne continuation
Bruno

 

Vote positif 0 Vote négatif

T

TOM801282

XLDnaute Nouveau

• 2 Mars 2016

• #4

Re : Macro lorsque la valeur d'une cellule calculée est supérieur à une autre

Merci beaucoup pour vos réponses rapides, je vais essayer vos suggestions🙂

 

Vote positif 0 Vote négatif

T

TOM801282

XLDnaute Nouveau

• 2 Mars 2016

• #5

Re : Macro lorsque la valeur d'une cellule calculée est supérieur à une autre

Merci Youki(Bj) de ta réponse mais lorsque je copie le code comme tu me l'as demandé, j'obtiens le message Sub ou fonction non définie🙁

 

Vote positif 0 Vote négatif

youky(BJ)

XLDnaute Barbatruc

• 2 Mars 2016

• #6

Re : Macro lorsque la valeur d'une cellule calculée est supérieur à une autre

Re:
Attention le code donné n'est pas à mettre dans un module, il est à mettre dans le code de la feuille.
Je viens de tester et le calculate ne se fait pas toujours cela dépend du changement
Dans ce fichier j'ai mis en événement Change
Bruno

 

Pièces jointes

• Expl.xlsm

  14.9 KB · Affichages: 19
• Expl.xlsm

  14.9 KB · Affichages: 15

Vote positif 0 Vote négatif

T

TOM801282

XLDnaute Nouveau

• 2 Mars 2016

• #7

Re : Macro lorsque la valeur d'une cellule calculée est supérieur à une autre

Merci à toi Youki, c'est exactement ce qu'il me fallait🙂

Bonne continuation

 

Vote positif 0 Vote négatif