définir un Range

Efgé

XLDnaute Barbatruc

• 17 Novembre 2010

• #2

Re : définir un Range

Bonjour sarrsouraa,
Pour les selectionnés séparément:

Code:

Range("A8:CQ" & Fin).Select
Range("DA8:ED" & Fin).Select

Pour les selectionnés ensemble:

Code:

Range("A8:CQ" & Fin & ",DA8:ED" & Fin).Select

Cordialement

 

Vote positif 0 Vote négatif

MJ13

XLDnaute Barbatruc

• 17 Novembre 2010

• #3

Re : définir un Range

Bonjour Sarrsouraa, Efgé

A tester et a adapter au second:

Code:

range("A8:CQ"&fin).select

 

Vote positif 0 Vote négatif

S

sarrsouraa

XLDnaute Occasionnel

• 17 Novembre 2010

• #4

Re : définir un Range

Merciiiiiiiiiii pour vos réponses Efgé et Mj13 ça marche parfaitement

 

Vote positif 0 Vote négatif

K

kjin

XLDnaute Barbatruc

• 17 Novembre 2010

• #5

Re : définir un Range

Bonjour zatous,

Code:

fin = 9
Set c = Application.Union(Range("A8:CQ" & fin), Range("DA8:ED" & fin))

A+
kjin

 

Vote positif 0 Vote négatif

S

sarrsouraa

XLDnaute Occasionnel

• 17 Novembre 2010

• #6

Re : définir un Range

Rebonjour tout le monde et merci Kjin pour ta réponse aussi
la façon du range que vous m'avez montré marche parfaitement avec toute les manipulations sauf le sort

Sheets("cost").Sort.SetRange (Sheets("cost").Range("A8:CQ" & fin & ",DA8:ED" & fin))

il m'affiche une erreur invalid call of procedure

si quelq'un a une idée
merciiiiiiiiiiiiii

 

Vote positif 0 Vote négatif