Excel Downloads
Forum

Précédent   Excel Downloads Forums > Archives > Forum Excel Downloads - Archives


 
 
LinkBack Outils de la discussion
Vieux 21/09/2003, 02h27   #1 (permalink)
Eric
Guest
 
Messages: n/a
Par défaut alerte musicale

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
 
Vieux 21/09/2003, 17h57   #2 (permalink)
vincent
Guest
 
Messages: n/a
Par défaut Re: alerte musicale

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

Règles de messages
Vous ne pouvez pas créer de nouvelles discussions
Vous ne pouvez pas envoyer des réponses
Vous ne pouvez pas envoyer des pièces jointes
Vous ne pouvez pas modifier vos messages

Les balises BB sont activées : oui
Les smileys sont activés : oui
La balise [IMG] est activée : oui
Le code HTML peut être employé : non
Trackbacks are oui
Pingbacks are oui
Refbacks are oui


Fuseau horaire GMT +2. Il est actuellement 04h46.


(C) 2006 Excel Downloads