Fonction rang dans un tableau

Question

Malgré mes recherches sur le sujet, je ne trouve pas de réponse à mon problème. J'ai dans la première colonne d'un tableau une liste de 5 nombres. Dans la 2eme colonne de mon tableau, j'aimerais inscrire le rang du nombre de la ligne correspondante en fonction de sa valeur. Ex: Valeur - Rang 12 - 5 54 - 2 36 - 4 87 - 1 49 - 3 Je précise que je ne veux pas passer "par la feuille", c'est à dire que je ne veux pas inscrire mes valeurs dans des cellules pour venir les lire ensuite. Je débute sur vba et je n'arrive pas à définir ma première colonne en tant que référence (arg2) de la fonction Rank_eq. Merci de votre aide...

78chris · Answer

Pas compris : pourquoi ne pas utiliser la fonction rang tout simplement ...

dhany · Answer

Bonsoir Cookislander , 78chris , Je suis tout à fait d'accord avec 78chris : c'est bien plus simple de passer par la fonction RANG() ! Je te retourne ton fichier Excel modifié : À l'ouverture du fichier, note bien que la plage C4:D8 est vide ; Ctrl t ➯ travail effectué ... mais les apparences sont parfois trompeuses ! les 2 colonnes de résultats ne sont pas les mêmes ! je te laisse trouver la différence ; si tu ne l'as pas vu sur la feuille, ce raccourci pourra t'y aider : Alt F11 pour voir le code VBA, puis revenir sur Excel Si besoin, tu peux demander une adaptation. Merci de me dire si ça te convient. dhany...

dhany · Answer

Bonjour Cookislander , J'ai longuement cherché, mais ta demande semble bien impossible ! En VBA, on peut utiliser expression .WorksheetFunction .Rank() pour calculer le rang d'une liste de nombres, mais expression doit être obligatoirement une variable qui représente un objet WorksheetFunction ; c'est donc incompatible avec toute tentative d'utiliser les tableaux du VBA. Comme j'ai Excel 2007 , je n'ai pas les 2 fonctions dérivées .Rank_Eq() et .Rank_Avg() ; mais ça semble bien idem pour elles deux. Pour plus d'infos, lire l'article de ce lien : https://msdn.microsoft.com/fr-fr/vba/excel-vba/articles/worksheetfunction-rank-method-excel La seule solution purement VBA serait donc de balayer tous les éléments du tableau VBA pour générer le rang. si un autre intervenant trouve une astuce pour utiliser .Rank() avec un tableau VBA, alors bravo à lui ! dhany...

MFerrand · Answer

J'arrive inopinément et indirectement sur ton sujet en traitant mes suivis en retard... Le problème auquel tu te heurtes tient au fait que certaines fonctions Excel acceptent des matrices sous diverses formes, donc éventuellement autres que plages, et dans ce cas lors de leur utilisation en VBA tu pourras utiliser un tableau, mais il est des fonctions qui n'acceptent les matrices que sous forme de plages et alors pas question d'utiliser un tableau... En principe, l'aide Excel permet de savoir ce qu'il en est pour chaque fonction, mais n'est au demeurant pas toujours précise : l'aide Excel sur RANG ne fait référence qu'à une matrice sans spécifier plage, mais l'expérience montre qu'elle refuse une matrice hors plage ; l'aide VBA sur la fonction Excel Rank est plus explicite en précisant une donnée de type Range. Et effectivement en essayant avec un tableau tu obtiens une incompatibilité de type... Alors, si tu ne veux rien matérialiser sur la feuille mais utiliser WorksheetFunction.Rank &#91;tu peux envisager de créer une fonction de calcul du rang en VBA mais cela tendrait à compliquer l'opération pour obtenir le résultat tel que le fournit la fonction Excel... pas très rentable donc !&#93;, tu commences par désactiver la mise à jour de l'affichage (de façon à ne rien voir), tu affectes ton tableau de valeur à une plage, ce qui te permet de calculer le rang de chaque valeur en utilisant la fonction, puis tu effaces... En ersatz, en partant de ton fichier : Sub test() Dim tab1(1 To 5, 1), i%, plg As Range Set plg = ActiveSheet.Range("B4:B8") For i = 1 To 5 tab1(i, 0) = plg.Cells(i, 1) tab1(i, 1) = WorksheetFunction.Rank(tab1(i, 0), plg) Next i plg.Resize(, 2).Value = tab1 End Sub Tes valeurs étant déjà dans une plage, on affecte la plage à une variable Range, on peut construire le tableau résultat (à 2 colonnes) avec les valeurs en 1re colonne et le rang calculé avec la fonction Excel en 2e colonne. Pour vérification je réaffecte le tableau sur la feuille, mais tu peux t'en dispenser et au contraire effacer... Il te faut cependant soit poursuivre selon l'utilisation prévue pour ce tableau résultat dans la même procédure car les variables étant locales elles disparaîtront en fin de celle-ci, soit déclarer ton tableau résultat au niveau module pour le conserver et pouvoir le réutiliser par la suite. Cordialement...

dhany · Answer

@ MFerrand : merci pour ton complément d'infos très intéressant ! pour moi non plus, c'était pas clair de pouvoir utiliser ou non un tableau hors plage. mais comme tu l'as mentionné, l'Aide Excel (ou VBA) n'est parfois pas assez explicite ! pire, y'a parfois une erreur de lien et ça mène à un article qui n'a rien à voir avec l'aide qu'on recherche ! dhany...