Bonjour,

Etant très novice sous VBA Excel je sollicite votre aide :
Je voulais ouvrir un script lorsqu'un évènement se produit sur mon classeur excel, cela fonctionne très bien, mais malheureusement le message apparait autant de fois que la condition se réalise. Comment faire pour que le script n'apparaît qu'une seule fois (et pas 50 fois quand la condition est vraie 50 fois )?

Voici mon code :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
Sub alerte()
    Dim Dt As Range
    Dim Ws As Worksheet
 
    Set Ws = Worksheets("Statut")
 
 For Each Dt In Ws.Range("A1:C17")
    If Dt > 100 Or Dt < 30 And Dt <> "" Then _
            Shell "WScript " & """C:\Documents and Settings\xxxxx\Bureau\alerte.vbs"""
    Next Dt
 
 
End Sub
Merci d'avance

Véro