voilà j´ai une liste de chiffres et j´ai mis en place 4 classes en r2 r3 r4 r5, les fréquences de classes que je veux seront donc en s2 s3 s4 s5 (en face quoi...).
Les classes sont les suivantes
+ de 1000
500 --> 1000
250 --> 499
0 --> 249

Je veux donc que les chiffres de ma liste compris dans telle ou telle classe soient comptabilisés.
Ex :
soit une liste : 520 230 549 2 56 87 420
mes classes donneront
s2 = 0
s3 = 2
s4 = 0
s5 = 4
mon programme qui ne marche pas :
Sub comptage4()
Range("f2").Select
Range("t2:u15").ClearContents
Do While UCase(ActiveCell) <> ""
cpt = 0
Do While UCase(Range("t2").Offset(cpt, 0)) <> "" And UCase(Range("t2").Offset(cpt, 0)) <> UCase(ActiveCell)
cpt = cpt + 1
Loop
If Range("t2").Offset(cpt, 0) = "" Then
Range("t2").Offset(cpt, 0) = ActiveCell.Value
End If
Selection.Offset(1, 0).Select
Loop
Range("t2").Select

Do While UCase(ActiveCell) <> ""
cpt = 0
Do While UCase(Range("f2").Offset(cpt, 0)) <> ""
If UCase(Range("f2").Offset(cpt, 0)) = UCase(ActiveCell) Then
Selection.Offset(0, 1) = 1 + Selection.Offset(0, 1)
End If
cpt = cpt + 1
Loop
Selection.Offset(1, 0).Select

c´estvraiment dommage que les gens à la fac apprennent les macro excel, plutôt qu´un langage civilisé.

Malheureusement, je ne comprend rien à ton code.
Pour nous aider il faudrait que tu indique plus clairement quelle case contient quoi au début et est censé contenir quoi à la fin d´une part.

D´autre part, tu dit que ça ne marche pas. Mais que ce passe-t-il ? ton programme ne fait rien ? ou alors il faut quelquechose qui n´est pas ce que tu veux ? et dans ce cas là, quoi ?