Incrementer en objet une selection

Voila, j'ai une selection je voudrais l'incrementer en tant qu'objet pour que je puisse travailler dessus. Mais je voudrais qu'il sorte en tant que objet range si c'est possible, je voudrais pouvoir compter ses lignes, me déplacer dedans etc...

Je l'ai déja nommer, mais on ne peut pas utiliser le .name("maselection") avec une quelconque méthode, puisque cela renvoie les coordonnées et pas la selection.

Merci d'avance

Bonjour

Je ne suis pas certain d'avoir tout compris, car je ne vois pas ce que tu veux dire par "incrémenter en objet une sélection"...

Si tu veux travailler avec un objet Range qui représente la place active d'Excel, tu peux t'inspirer de ceci:

Code:

---

1 2 3 4 5 6

Dim MaSelection As Range   Set MaSelection = Selection Debug.Print MaSelection.Rows.Count ' Nombre de ligne de la sélection Debug.Print MaSelection.Cells(3, 2) ' Valeur de la cellule B3 DE LA SELECTION

---

Cela répond-il à ton problème?

Grand merci, mais, car il y a un mais, ca me fait un truc tout bizarre.J'ai appliqué un filtre sur une plage de données et j'ai selectionner les cellules d'après filtrage. Je vais te mettre mon code :

Code:

---

1 2 3 4 5 6 7 8 9 10

Dim kaka as Range   Range("A1").CurrentRegion.SpecialCells(xlCellTypeVisible).Select   Set kaka = Selection   kaka.Offset(3,11).copy   Range("A9).PasteSpecial

---

Là en fait, la selection, bizarement, va bien copier mais toute la ligne à partir de l'offset(3,11) et la dernière ligne de la selection à partir de la même colonne... comme si j'avais aussi marquer offset(activecell.end(xlEnd),11).

donc les 2 selections sont copiés mais je ne veux en vérité qu'une cellule.

J'ai trouvé comment selectionner la cellule que je voulais. En fait, il fallait après mettre :

Code:

---

kaka.Range("A1").Offset(3,11).copy

---

Merci encore à toi ton ton aide précieuse, merci merci aussi à la communauté Developpez.net et à tous ceux qui comme toi permette d'aider.