Problème de CheckBox et boucle si

[Lindoo]

Bonjour, jsuis un ptit nouveau sur ce forum 🙂
Pour mon stage de bts informatique je touche un peu à du vba excel, j'ai déjà fait du vb, mais j'ai des problèmes de débutant :-/

Mon problème se trouve à ce niveau :
For i = 1 To X
If Worksheets("Feuil1").Range("B" & i) = Prod Then
If Worksheets("Feuil1").Range("C" & i) = Marc Then
If Worksheets("Feuil1").Range("F" & i) = Dep Then
If Worksheets("Feuil1").Range("D" & i) = "X1" Then
Compteur1 = Compteur1 + 1
ElseIf Worksheets("Feuil1").Range("D" & i) = "X2" Then
Compteur2 = Compteur2 + 1
ElseIf Worksheets("Feuil1").Range("D" & i) = "X3" Then
Compteur3 = Compteur3 + 1
ElseIf Worksheets("Feuil1").Range("D" & i) = "X4" Then
Compteur4 = Compteur4 + 1
ElseIf Worksheets("Feuil1").Range("D" & i) = "X10" Then
Compteur5 = Compteur5 + 1
End If
End If
End If
End If
Next

Mes variables Prod, Marc et Dep sont pour le moment des chaines de caractères. Le problème c'est qu'elles sont issues de mes CheckBox (3)... donc je ne peux pas cocher plusieurs obtions avec mes CheckBox (ce qui est génant... ). Je ne sais pas comment transformer mes variables pour qu'elles puissent être exploitables. On m'a conseillé de faire une fonction avec des tableaux, mais je ne vois pas non plus comment l'introduire dans mes boucles.
Merci d'avance pour vos réponses.

 

[Lindoo]

Un peu plus de détails :
Pour mon CheckBox Prod, par exemple il y a 2 case donc 3 choix (c'est le plus petit).
Ma boucle if teste une colonne de mon tableau avec :
- "ARE" et "TYP"
- "POM"
- "ARE" et "TYP" et "POM"

 

[Lindoo]

EHLP
Personne ne sait m'aider sur ce coup :'(
J'ai peu être mal formulé mon problème...
Merci d'avance aux personnes qui se pencheraient sur mon cas (grave :roll: )