Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

erreur dans macro tri d'un tableau

ldexplorer

XLDnaute Junior
Bonjour à vous tous excelliens,

Certains que le froid n'aura pas trop réduit l'activité de vos neurones, je vous soumets un nouveau problème.

Dans le cadre d'une petite bdd, je souhaite mettre en place la macro suivante. J'ai copié le code ci-après. Cette macro doit sélectionner permets de faire un tri par ordre croissant sur deux colonnes d'un tableau. Elle sélectionne la ligne B10 jusqu'à la dernière ligne dans laquelle figure des données puis fait le tri.

Problème : elle ne fonctionne pas.

Code:
Sub tritableau()
Dim li As Integer 'déclare la variable li

    'sélectionne la première ligne (B10)du tableau jusqu'à la dernière
    li = ActiveSheet.Range("B65536").End(xlUp).Row
    Rows(Cells(li, 2), Cells(li, 7)).Select
    
    'effectue le tri
    Selection.Sort Key1:=Range("B11"), Order1:=xlAscending, Key2:=Range("C11" _
        ), Order2:=xlAscending, Header:=xlGuess, OrderCustom:=1, MatchCase:= _
        False, Orientation:=xlTopToBottom, DataOption1:=xlSortNormal, DataOption2 _
        :=xlSortNormal

End Sub

Conséquence : cherche donc excellien compréhensif pouvant m'aider
A très bientot, j'espere sur ce fil et d'avance merci
 

Hervé

XLDnaute Barbatruc
Re : erreur dans macro tri d'un tableau

bonsoir

j'ai pas testé ton code mais, cette syntaxe me surprend :

Rows(Cells(li, 2), Cells(li, 7)).Select

j'aurais plutot vu un truc dans le style :

range(Cells(10, 2), Cells(li, 7)).Select

salut

edition : oups désolé JP, salut à toi
 

Discussions similaires

Réponses
8
Affichages
831
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…