Discussion :

[Jay29]

Bonjour à tous.

Je vous explique mon problème : j'ai crée une macro sous excel 2007 cependant elle ne fonctionne qu'à moitié pour ne pas dire qu'elle ne fonctionne pas. Voici la macro en question :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
For i = 2 To ActiveSheet.UsedRange.Rows.Count
 
If 1 <= Range("F" & i).Value <= 3 Then
    Range("AF" & i).Value = 1
ElseIf 4 <= Range("F" & i).Value <= 6 Then
    Range("AF" & i).Value = 2
ElseIf 7 <= Range("F" & i).Value <= 9 Then
    Range("AF" & i).Value = 3
Else
    Range("AF" & i).Value = 4
End If
Next i

Le problème est qu'il m'écrit la valeur 1 dans toute mes cellules que ma condition soit entre 1 et 3 ou entre 4 et 6. Je pensais pourtant avoir utilisé la bonne méthode. Si vous avez des idées n'hésitez pas! Merci.

[-={-_-}=-]

Tu ne dois pas écrire

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

If 1 <= Range("F" & i).Value <= 3 Then

mais plutot

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

If Range("F" & i).Value <=1 And Range("F" & i).Value <= 3 Then

[Pierre Fauconnier]

Salut

Ta syntaxe n'est pas correcte

Tu peux utiliser des case

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
select case Valeur
    case 1 to 3
         ....
    case 4 to 6
        ...
    case 7 to 9
        ...
    case else
        ...
end select

-={-_-}=-: Attention. tu as inversé le signe du premier test...

[Jay29]

Effectivement ça fonctionne! Merci beaucoup pour votre aide !