Selection cellules

anber · 24 Novembre 2004

Bonjour,

Je recherche le code pour une selection de cellules en fonction d'une autre cellule en utilisant éventuellement offset

Merci

CBernardT · 24 Novembre 2004

Bonjour Anber

Je te propose ce code :

Sub selection()
Dim Cel As Range
Set Cel = Range("B3")
'Méthode Union et propriété Entirerow très utiles pour ce genre sélection
Union(Cel.EntireRow.Range("A1"), Cel.EntireRow.Range("C1:F1")).Copy Destination:=Range("E11")
Set Cel = Range("I8")
'Avec la Propriété Offset
Union(Cel.Offset(0, -7), Range(Cel.Offset(0, -4), Cel.Offset(0, -2))).Copy Destination:=Range("E12")
End Sub

Cordialement

CBernardT

anber · 24 Novembre 2004

Bonjour CBernardT

Exactement ce que je cherchais

Merci

BA

Selection cellules

anber

Guest

Pièces jointes

CBernardT

Guest

anber

Guest

Discussions similaires

Selection cellules

anber

Guest

Pièces jointes

CBernardT

Guest

anber

Guest

Discussions similaires

Privacy & Transparency

Privacy & Transparency