X grandes valeur array large index
Bonjour
Je voudrais récupérer les x grande valeurs d'un array
La ligne qui me cause problème et qui est sensée me renvoyée les 10 plus grandes valeurs, sur la ligne 3 du tableau
Tab_Num_Sorties(3, j) = Application.Large(Application.WorksheetFunction.Index(Tab_Num_Sorties, 2, 0), Z)
la procédure fait partie d'une autre boucle
une des lignes à classer :
16,66666667 4,166666667 4,166666667 20,83333333 0 0 4,166666667 12,5 8,333333333 8,333333333 12,5 12,5 0 0 0 0 0 0 0 0
le résultat de la procédure: toujours la même valeur ?
4,35 4,35 4,35 4,35 4,35 4,35 4,35 4,35 4,35 4,35 4,35 4,35 4,35 4,35 4,35 4,35 4,35 4,35 4,35 4,35
merci
Code:
For k = 1 To 3 'UBound(Tab_Num_Sorties, 2)
For j = 1 To 20 'UBound(Tab_Num_Sorties, 1)
For Z = 1 To 10
Tab_Num_Sorties(1, j) = Application.WorksheetFunction.CountIf(Plage_BD, j)
Tab_Num_Sorties(2, j) = (Tab_Num_Sorties(1, j) / NB_courses) * 100
Tab_Num_Sorties(3, j) = Application.Large(Application.WorksheetFunction.Index(Tab_Num_Sorties, 2, 0), Z)
Debug.Print Tab_Num_Sorties(3, 1)
Next
Next
Next
'Cells(i, 328).Resize(UBound(Tab_Num_Sorties, 1), UBound(Tab_Num_Sorties, 2)) = Tab_Num_Sorties
'Cells(i, 328).Resize(UBound(Tab_Num_Sorties, 1), UBound(Tab_Num_Sorties, 2)) = application.index(Tab_Num_Sorties(1,1)
'"""""""""""""""
'Affichage ligne 1 du tableau
varTemp = Application.Index(Tab_Num_Sorties, 1, (Array(1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20)))
Cells(i, 350).Resize(, UBound(Tab_Num_Sorties, 2)) = varTemp
'Affichage ligne 2 du tableau
varTemp_2 = Application.Index(Tab_Num_Sorties, 2, (Array(1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20)))
Cells(i, 372).Resize(, UBound(Tab_Num_Sorties, 2)) = varTemp_2
'Affichage ligne 3 du tableau
varTemp_3 = Application.Index(Tab_Num_Sorties, 3, (Array(1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20)))
Cells(i, 393).Resize(, UBound(Tab_Num_Sorties, 2)) = varTemp_3
Erreur sur la ligne
La ligne qui donne le résulta 4.35 :
17,39130435 4,347826087 4,347826087 [/u][/b][/b]17,39130435 0 0 4,347826087 13,04347826 8,695652174 8,695652174 13,04347826 13,04347826 0 0 0 0 0 0 0 0
Le résultat répété est celui de la troisième colonne
une des lignes à classer :
16,66666667 4,166666667 4,166666667 20,83333333 0 0 4,166666667 12,5 8,333333333 8,333333333 12,5 12,5 0 0 0 0 0 0 0 0
le résultat de la procédure: toujours la même valeur ?
4,35 4,35 4,35 4,35 4,35 4,35 4,35 4,35 4,35 4,35 4,35 4,35 4,35 4,35 4,35 4,35 4,35 4,35 4,35 4,35
merci