Bonjour,
Je cherche à compter le nombre de cellules ayant des valeurs prédéfinies dans plusieurs colonnes.
Lorsque j'écris :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
For i = 0 To Nbcol
    For j = 1 To 24
        If RgPl.Offset(j, -i) > Ref.Offset(3, 0) Then
            For k = 1 To 4
                With Pl
                Etape = Application.WorksheetFunction.CountIf(Columns(2), k)
                End With
            Next k
        End If
    Next j
Next i
Ma variable Etape prend bien la valeur correspondante au nombre de cellule ayant comme critère "k" dans ma colonne B.
Or je cherche à balayer les colonnes de A, B, C, D etc...

J'ai donc écris ceci:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
For i = 0 To Nbcol
    For j = 1 To 24
        If RgPl.Offset(j, -i) > Ref.Offset(3, 0) Then
            For k = 1 To 4
                With Pl
                Etape = Application.WorksheetFunction.CountIf(Columns(i), k)
                End With
            Next k
        End If
    Next j
Next i
Avec ce code j'ai un message d'erreur :
Erreur définie par l'application ou par l'objet
J'ai cherché sur le forum une réponse mais n'ai rien trouvé de satisfaisant pour mon cas.

Ma question est donc : Comment définir une colonne en utilisant une variable?
Est-ce une question de syntaxe? de déclaration?
Merci pour votre aide et vos conseils
Eric