Recopie d'un format excel

majo410 Messages postés 23 Date d'inscription   Statut Membre Dernière intervention   -  
Ricky38 Messages postés 4349 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,


J'ai fait un planning mensuel avec une macro qui colorie les week end et jours fériés.

Or je voudrais que ce format se recopie sur des lignes en dessous et je n'arrive pas à automatiser cette recopie.
Je le fais manuellement avec la recopie de mise en forme mais j'aurais voulu l'automatiser pour ne pas avoir à refaire la manipulation chaque mois. (et oui on devient paresseux avec Excel)

Est-ce que quelqu'un aurait une idée ?

Merci

A voir également:

1 réponse

Ricky38 Messages postés 4349 Date d'inscription   Statut Contributeur Dernière intervention   1 462
 
Salut,

pour recopier seulement le format de cellule. Exemple si tu as tes cellules A10:B15 et tu veux copier le format en A25:A30

Sub copie()
Worksheets("Feuil1").Range("A10:B15").Copy
Range("A25:B30").PasteSpecial Paste:=xlFormats
End Sub

0