VBA excel_ indiquer des valeurs avec MSGBOX

Y0 -  
m@rina Messages postés 23933 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,
j'ai une colonne (L) avec des nombres
je souhaiterai que mon MSGBOX indique le nombre de cellules de cette colonne qui sont inférieur au nombre 30.
Quelqu'un pourrait-il me filer un coup de main? merci

3 réponses

m@rina Messages postés 23933 Date d'inscription   Statut Contributeur Dernière intervention   11 465
 
Bonjour,

Voici un exemple de code pour les 50 premières lignes de la colonne L :

Sub compte()
Dim counter As Integer
counter = 0

For Each cellule In Range("L1:L50")
    If cellule.Value < 30 Then counter = counter + 1
Next cellule
MsgBox ("Nombre de cellules inférieures à 30 : " & counter)

End Sub


m@rina
0
Y0
 
merci pour ta réponse
mais ça se complique, car ça ne marche pas!
peut etre que pcq que les valeurs de ma colonne sont des dates!!!
inférieur à 30 veut dire inférieur à 30 jours (chiffre calculé)
0
m@rina Messages postés 23933 Date d'inscription   Statut Contributeur Dernière intervention   11 465
 
Bonsoir Yo,

Ah ben oui, mais si tu dis pas tout !!!
Je ne comprends pas alors ce que tu veux...
Trop d'explication ne nuit pas...

m@rina
0