Appel de macro par un évènement

Bonjour à tous et toutes

Si quelqu'un peut m'aider en VBA ( j'ai quelques bases) cela sera super !!!!!!

Description :J'ai une liste de valeurs (que je récupère d'un autre tableau par copier coller les valeurs ) et dont la somme "volatile" est située dans une cellule A11

J'ai une macro qui me ressort le maxi et le mini atteint par cette somme, en A13 et A14.

J'ai créé un évènement de manière à ce que le changement de valeur de la cellule somme me mette à jour le mini et le maxi . Or cet évènement ne marche pas si une des valeurs saisie ( A1 à A10) est modifiée. Pourtant si l'on se contente simplement d'activer la cellule qui contient la somme A11 puis Enter la macro est appelée correctement et les Mini et maxi se mettent à jour.

Si quelqu'un à une piste, je le remercie d'avance

Cordialement

Daffy

9test-min-max.xlsm (16.52 Ko)

Bonjour,

Votre explication ne correspond pas au contenu de votre fichier.

J'ai pris l'exemple sur le changement de la cellule A1 de l'onglet Feuil1. Il vous faut ajouter cette procédure dans le module de cet onglet :

Private Sub Worksheet_Change(ByVal Target As Range)

     If Target.Count > 1 Then Exit Sub

     If Not Intersect(Target, Range("A1")) Is Nothing Then
        Saisie_MinMax_Volatiles
     End If

End Sub

Bonjour Eric

Merci pour la réponse. J'ai essayé sur le fichier mais cela ne fonctionne pas.

Est ce que j'ai fait les choses correctement ??? ...... sur le bon fichier

Merci

Cet évènement se suffit à lui-même dans le module de Feuil1 :

Private Sub Worksheet_Change(ByVal Target As Range)

     If Target.Count > 1 Then Exit Sub

     If Not Intersect(Target, Range("A1:A10")) Is Nothing Then
        If Range("A11") > Range("A13") Then Range("A13") = Range("A11")
        If Range("A11") < Range("A14") Then Range("A14") = Range("A11")
     End If

End Sub

Merci Eric pour ce bout de code qui fonctionne

Bonne fin de journée

Cdt

Rechercher des sujets similaires à "appel macro evenement"