VBA excel_ indiquer des valeurs avec MSGBOX

Fermé
Y0 - 13 juil. 2007 à 09:28
m@rina Messages postés 22266 Date d'inscription mardi 12 juin 2007 Statut Contributeur Dernière intervention 23 avril 2025 - 13 juil. 2007 à 23:17
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 22266 Date d'inscription mardi 12 juin 2007 Statut Contributeur Dernière intervention 23 avril 2025 11 425
13 juil. 2007 à 14:39
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
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 22266 Date d'inscription mardi 12 juin 2007 Statut Contributeur Dernière intervention 23 avril 2025 11 425
13 juil. 2007 à 23:17
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