![]() |
|
Forum
|
|
|
#1 (permalink) |
|
Guest
Messages: n/a
|
Bonjour,
J'ai besoin de créer une alerte surveillant la valeur de 4 cellules 2 à 2 Une première qui sert d'alerte (un bip ponctuel) : -Quand la cellule L3 est à + ou - 1 point de la cellule L2 et quand la cellule M3 est à + ou - 1 point de la cellule M2 Un deuxième qui sert de signal (un bip ponctuel différent): -Quand la cellule L3 est égale à la cellule L2 et quand la cellule M3 est à égale à la cellule M2 D'avance merci pour votre aide Eric |
|
|
#2 (permalink) |
|
Guest
Messages: n/a
|
Bonjour
Voila une macro à copie dans la feuille ou ce trouve tes données à surveiller Private Sub Worksheet_Change(ByVal Target As Excel.Range) If Not Application.Intersect(Range("l2:m3"), Range(Target.Address)) Is Nothing Then If Abs(Range("l2") - Range("l3")) = 1 And Abs(Range("m2") - Range("m3")) = 1 Then beep End If If Range("l2") = Range("l3") And Range("m2") = Range("m3") Then beep Application.Wait DateAdd("s", 1, Time) beep End If End If End Sub Elle fait un simple beep pour le premier cas et un double dans le 2 cas Voila @+Vincent |
| ANNONCES | |
| Liens sociaux |
| Outils de la discussion | |
|
|