Discussion :

[sophie284]

Bonjour,

Je travail actuellement sur un devoir universitaire où je dois travailler sur excel, mais n'utiliser que du code VBA pour remplir mon classeur, seulement je suis bloqué. Je souhaite définir des ordres de passage selon une valeur K(n), la plus petite valeur aura le rang 1, la deuxième plus petit le rang 2 ainsi de suite. Alors que je connais la formule Excel RANG, je ne sais pas comment la convertir pour le coder en VBA, pouvez-vous m'aider ?

Merci d'avance,

[Invité]

Bonjour,

Une fois votre formule RANG mise en place, vous créez une macro, vous faîtes ENTER dans la barre de formule et vous arrêtez la macro. Logiquement, vous devriez avoir la traduction de votre formule en VBA dans l'éditeur de macro (Alt-F11).

[sophie284]

Je ne suis pas sur de bien faire ce que vous me dites, ca n'a pas l'air de fonctionner

[sophie284]

Eric, j'ai suivis les indications données, ca me sors un code mais celui-ci ne fonctionne pas, il modifie tout mon tableau

[joe.levrai]

Bonjour,

tu peux utiliser la fonction Rank, exemple un peu bâclé

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Cells(1, 2).Value = Application.WorksheetFunction.Rank(25, Range("A1:A10"), 1)

[sophie284]

Joe à quoi correspond au début "Cells(1:2)" ?

[joe.levrai]

C'est juste pour écrire le résultat en B1, j'aurais pu écrire Range("B1")

[Invité]

Eric, j'ai suivis les indications données, ca me sors un code mais celui-ci ne fonctionne pas, il modifie tout mon tableau

Si la réponse de JOE LEVRAI vous convient, alors on peut en rester là. Sinon, le code que vous avez récupéré vous donne une idée de la syntaxe utilisée. Il faut ensuite modifier ce code pour qu'il s'applique à toutes vos cellules.