Macro pour coller le format de la ligne 1 sur les lignes sél

Bonjour Forum,

Comme l'indique le titre, je voudrais faire une macro qui colle le format de la ligne 1 sur les lignes sélectionnées (même en cas de sélection discontinue).

Ça parait simple comme ça, mais je ne sais pas le faire !

Quelqu’un pourrait-il m’aider ?

Merci !

Bonjour

Macro à affecter à une bouton

Tu sélectionnes les lignes puis tu appuies sur le bouton

Sub ColleFormat()
  Application.ScreenUpdating = False
  Rows(1).Copy
  Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _
      SkipBlanks:=False, Transpose:=False
  Application.CutCopyMode = False
End Sub

C'est cool.

Merci !!!