Boucle avec la fonction countifs vba

amr37 -  
 Mosca -
Bonjour, ayant imprécier l'aide que les gens du forum nous accordent, j'aimerai m'adresser à vous pour se demander s'il y'a de possibilité de boucler avec la fonction countifs. Voici une coupe du code pour aide :
.Cells(2, 4) = Application.WorksheetFunction.CountIfs(Plage1, X1, Plage2, Y1)
.Cells(3, 4) = Application.WorksheetFunction.CountIfs(Plage1, X2, Plage2, Y2)
.Cells(4, 4) = Application.WorksheetFunction.CountIfs(Plage1, X3, Plage2, Y3)
.Cells(5, 4) = Application.WorksheetFunction.CountIfs(Plage1, X4, Plage2, Y4)
.Cells(6, 4) = Application.WorksheetFunction.CountIfs(Plage1, X5, Plage2, Y5)
.Cells(7, 4) = Application.WorksheetFunction.CountIfs(Plage1, X6, Plage2, Y6)
Plage1 et plage2 représentent des plages nommées définies auparavant
X et Y sont des constantes
je souhaite réduire ce code (à noter qu'il y'en a plusieurs lignes) à l'aide d'une boucle qui calcul de cellules en cellule pour la méme colonne ainsi x1 avec Y1, X2 avec Y2 et ainsi de suite
Merci d'avance pour l'aide et le temps

1 réponse

Réponse 1 / 1
Mosca
 
Bonjour,

Si tu mets les constantes X et Y en tableau ça peut le faire 

for i=2 to 7
.Cells(i, 4) = Application.WorksheetFunction.CountIfs(Plage1, X(i-1), Plage2, Y(i-1)) 
next


cordialement
0

Discussions similaires

"L'indice n'appartient à la sélection" + VBA
fleur.31 -
geosevda -

2 réponses
Erreur d'exécution 13 Incompatibilité de type
grace -
pijaku -

5 réponses
appliquer une pause dans une macro vba excel
ch'duj -
lerif25 -

10 réponses
ouverture d'un fichier excel à partir d'un code VBA
TraderAS -
pijaku -

3 réponses
Méthode find dans VBA - Recherche de données sous Excel
baissaoui -
baissaoui -

0 réponse