Executer la macro dans la plage sélectionnée

Bonjour,

Je souhaiterais par l'intermédiaire d'un clic sur un bouton de remplir une plage sélectionnée.

Lorsque je fais sur une cellule (n'importa laquelle), ma macro fonctionne. Mais si je sélectionne une plage, là, ça ne fonctionne plus, cela fait que dans la cellule qui est en haut à gauche.

Voici ce que j'ai rédigé:

Sub Ca()
'
' Macro pour Ca

    ActiveCell.Select
    With Selection.Interior
        .ColorIndex = 41
        .Pattern = xlSolid
    End With
    ActiveCell.FormulaR1C1 = "Ca"

End Sub

Que dois-je modifier ? C'est quelque chose dans ActiveCell.Select et ActiveCell.FormulaR1C1 à modifier je pense mais quoi ...

Bonjour,

Essaie

 With Selection
  .Interior.ColorIndex = 41
  .FormulaR1C1 = "Ca"
 End With

Amicalement

Dan

Bonjour,

merci, c'est super, c'était exactement ce qu'il me fallait.

Un grand merci