P
Pias
Guest
Bonsoir le Forum
Je souhaite faire un macro pour afficher un msg box avec de conditions.
J’ai trouvé comment faire cellule par cellule (exemple macro ci-dessous, merci Michel).
Mais si la colonne contient plusieurs fois la condition comment faire pour que le message s’affiche une seule fois.
Merci d’avance
----------------------------------------------
Sub Masquerinv()
Sheets("Tri_2").Select
Dim Cell As Range
For Each Cell In Range("L1:L18")
If Cell = "1" Then MsgBox "Attention stock minimum . "
If Cell = "-1" Then MsgBox "Attention solde négatif ."
If Cell = "" Then MsgBox ""
Next Cell
Range("A1").Select
End Sub
----------------------------------------------
Amicalement
...On se lasse de tout sauf d’apprendre !..
Je souhaite faire un macro pour afficher un msg box avec de conditions.
J’ai trouvé comment faire cellule par cellule (exemple macro ci-dessous, merci Michel).
Mais si la colonne contient plusieurs fois la condition comment faire pour que le message s’affiche une seule fois.
Merci d’avance
----------------------------------------------
Sub Masquerinv()
Sheets("Tri_2").Select
Dim Cell As Range
For Each Cell In Range("L1:L18")
If Cell = "1" Then MsgBox "Attention stock minimum . "
If Cell = "-1" Then MsgBox "Attention solde négatif ."
If Cell = "" Then MsgBox ""
Next Cell
Range("A1").Select
End Sub
----------------------------------------------
Amicalement
...On se lasse de tout sauf d’apprendre !..