Discussion :

[hitmax]

Et est-it possible d'intégrer un

Code :

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

1
2
 
Selection.End(xlDown)

dans le

Code :

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

1
2
 
Range("C6:O490")

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.

Merci

[fring]

Bonjour,

Tu peux tester ceci

Code :

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

1
2
3
4
5
Dim DerCel As String
 
DerCel = Cells.SpecialCells(xlCellTypeLastCell).Address
 
Range("C6:" & DerCel).'ce que tu veux faire

[JackOuYA]

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 :

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

  Range("A1").CurrentRegion.Sort Key1:=Range("A1")

[hitmax]

perfetto grazie le forum