application d'un modele de feuille à toutes

  • Initiateur de la discussion Initiateur de la discussion Nari
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

N

Nari

Guest
Bonjour,
j'ai un certain nombre de feuille qui concernent les mois de l'année.
J'ai fais une mise en forme du mois de janvier et je veux que cette modification s'applique à toutes les restes (seulement les feuilles mois de l'année).Quelqu'un a -t-il une solution?
Merci d'avance.
 
Salut Nari,

Une solution :

Sur ta feuille janvier, sélectionnes les colonnes A à ...

bouton droit / Copier

ensuite sélectionner les feuilles février à décembre

puis faire Copier / Collage Spécial / Format.


Une autre solution consisterait à créer une feuille janvier avec tous les formats souhaités, puis à la dupliquer 11 fois (février à décembre).

Reviens si problème

@+
 
Salut à tous les 2, et puis aux autres.

voilà une macro que j'utilise pour mettre à jour des éléemnts d'une feuille 'FeuilleReference' :

Do While Sheets(j).Name <> 'FeuilleReference'
Sheets(j).Select
'va copier les élément A2:A100' - A adapter
Range('A2:A100').Select
selection.Delete Shift:=xlUp
Sheets('FeuilleReference').Select
Range('A2:A100').Select
selection.Copy
Sheets(j).Select
Range('A2:A100').Select
ActiveSheet.Paste
'va copier les élément B2:CM5' - A adapter
Range('B2:CM5').Select
selection.Delete Shift:=xlUp
Sheets('FeuilleReference').Select
Range('B2:CM5').Select
selection.Copy
Sheets(j).Select
Range('B2:CM5').Select
ActiveSheet.Paste

j = j + 1

Loop
Sheets('FeuilleReference').Select
Range('A1').Select
Exit Sub

Sheets('FeuilleReference').Visible = False


End Sub

J'espère que cela va t'aider

Bonne soirée

VBA DEAD
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Réponses
2
Affichages
160
D
  • Question Question
Réponses
5
Affichages
246
Didierpasdoué
D
Réponses
5
Affichages
427
Retour