bonjour
j'ai essayé de voir des exemples de tri avec entête sans parvenir à réussir mon tri.
celui-ci se fait sur la colonne 3
comme suit :
je pense que c'est le nombre de virgules qui ne fonctionne pas!
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9 Const xlascending = 1 Const xlGuess = 0 Set xlapp = CreateObject("Excel.Application") xlapp.Visible = True Set wk = xlapp.Workbooks.Open(fic, 0,True) Set ws = wk.Sheets(1) ws.activate ws.UsedRange.Select xlapp.selection.Sort ws.Range("C2"), xlAscending ,,,,, xlGuess
Partager