Selection multiples ranges non contigues

Bonjour,

Je tourne en rond car ne trouve pas la bonne écriture ...

=> Je cherche a faire une selection de plusieurs ranges a partir d'une cellule connue, mais qui ne sera jamais la meme..

Exemple:

screenshot 3

La cellule B2 est la cellule connue, la selection doit etre B2:C5 et F2:F6
Le but est de selectionner cet ensemble pour pouvoir le coller plus bas dans la feuille, sans aucunes modifications..

J'ai essayé plusieurs solutions en essayant de m'inspirer de :

Union(Range("A1:A" & nbligne), Range("D1:D" & nbligne)).Select

mais je ne suis parvenu à rien de propre...

Actuellement je suis avec cette ligne :

Union(Range(ActiveCell, ActiveCell.Offset(4, 2)), Range(ActiveCell.Offset(0, 4, Range(cells(4, 0))).Select

je ne suis peut-etre pas loin ...

Bonsoir

Sur base de votre tableau et si la cellule sélectionnée est B2, essayez ceci

Union(Range(ActiveCell, ActiveCell.Offset(3, 1)), Range(ActiveCell.Offset(, 4), ActiveCell.Offset(3, 4))).Select

Si vous copiez, remplacez le SELECT par COPY

si ok -->

Cordialement

Merci beaucoup !

Pas loin, mais quelques lacunes encore ..

Bien cordialement.

Max.

Rechercher des sujets similaires à "selection multiples ranges contigues"