appliquer une macro a une plage de cellule variable

Bonjour le forum,

J essaie d appliquer une macro a des blocs de cellules excel

mon probleme c est que une fois celui ci contient 1 cellule, une autre fois 4, ou encore 8... le nombre de cellule contenue dans mon bloc de cellule est donc variable.

cependant les cellules sont toujours les une a la suite des autres sur une meme colonne. il n y a donc que le nombre de ligne qui varie. ex ("A1:C1") ou ("E1:K1")

en cochant l option position relative ds la petite barre d enregistrement
j obtient par exemple

Code:

---

ActiveCell.Range("A1:C1").Select

---

mais alors ma macro ne s efectuera alors que sur des blocs de 3 cellules...

Comment faire pour que vba applique ma macro sur le bloc que j ai selectionné
celui ci pouvant biensur comporté 4 ou 10 ou... cellules :? ?

Merci beaucoup

:faq:

Comment ajouter une commande au menu contextuel d'une cellule Excel ?

8-) Bonjour

Voila une macro qui colorie en rouge une plage de cellules sélectionnée. Il suffira d'adapter ton code à cet exemple

Code:

---

1 2 3 4 5 6

Dim c As Range For Each c In Selection   c.Interior.ColorIndex = 3   Next c

---

Cordialement

Merci Lexot


3 lignes !
la honte pour moi :oops:
c est exactement ce que je voulais.

Kimbe raid !

8-) Bonjour

Cette macro fournit le numéro de la première et la dernière ligne de la plage sélectionnée (pre et der). Il faut sélectionner du haut vers le bas sur une seule colonne(cellule active en haut).

Code:

---

1 2 3 4 5 6 7 8

Dim c As Range Dim pre As Integer, der As Integer pre = ActiveCell.Row   For Each c In Selection der = der + 1 Next c der = der + pre - 1

---

Cordialement