Voici ce que j'aimerais que mon code fasse,
1- aille compter sur la feuille 2 le nombre de fois qu'il y a un la valeur de la variable niv (dans mon cas, un "6" la première fois dans la colonne 100. Pour y arriver (à compter sur la feuille 2), je n'ai pas trouvé d'autres solution que d'activer la feuille 2 avant de débuter cette section dans mon code... Le sheets(2).Range ne semble pas fonctionner...
2- imprime cette information sur la feuille 1 dans la cellule 2, 2
etc
Dim Nb As Integer
Dim NbNiveau As Integer
Dim Niv As Integer
x = 2
y = 2
Niv = 6
For Nb = 1 To 6
NbNiveau = Application.Function.CountIf(Range(Cells(2, 100), Cells(2, Lignes)), Niv.Value)
Sheets(1).Cells(x, y).Value = NbNiveau
Niv = Niv - 1
x = x + 1
Next
Maintenant, après la virgule (0), Cells(2, Lignes)),) , je devrais avoir =6, mais comment je fais pour que la formule cherche le "6" qui est cachée dans la variable Niv?
J'ai essayé avec ""="" & Niv ", ""="&Niv""... sans jamais y arriver...
Merci