Et est-it possible d'intégrer un
dans leCode:
1
2 Selection.End(xlDown)
ou bien un parametre de la fonction sort qui pourrait me prendre la plage jusqua ce qu il n y est plus de données.Code:
1
2 Range("C6:O490")
Merci
Version imprimable
Et est-it possible d'intégrer un
dans leCode:
1
2 Selection.End(xlDown)
ou bien un parametre de la fonction sort qui pourrait me prendre la plage jusqua ce qu il n y est plus de données.Code:
1
2 Range("C6:O490")
Merci
Bonjour,
Tu peux tester ceci
Code:
1
2
3
4
5 Dim DerCel As String DerCel = Cells.SpecialCells(xlCellTypeLastCell).Address Range("C6:" & DerCel).'ce que tu veux faire
Bonsoir,
HitMax, s'il s'agit d'un tri (sort) il y a des chances que tes données à triées sont contigues (pas de ligne ou colonne vide en plein milieu) tu pourrai donc utiliser currentRegion :
Code:Range("A1").CurrentRegion.Sort Key1:=Range("A1")
perfetto grazie le forum