Executer un seul macro pour plusieurs feuille

Fermé
ilies - 23 avril 2010 à 16:19
 ilies - 1 mai 2010 à 12:32
boujour
aidez moi svp
je veux excuter un seul macro pour 4 feuil execel a la foi.
mecri beaucoup
A voir également:

3 réponses

Gord21 Messages postés 918 Date d'inscription samedi 21 novembre 2009 Statut Membre Dernière intervention 20 mars 2013 289
23 avril 2010 à 21:44
Bonsoir,
Et que veux-tu faire ?
0
bonjour Mr
je vous remercier pour ton message
je vous donne un exemple
sub macro1()
Range("A1:H22").Select
Selection.Font.Bold = True
end sub
je veux executer cette macro dans la feuil1,feuil2,feuil3,feuil4 a la foi
0
Gord21 Messages postés 918 Date d'inscription samedi 21 novembre 2009 Statut Membre Dernière intervention 20 mars 2013 289
Modifié par Gord21 le 28/04/2010 à 22:55
Bonsoir,
Tu peux utiliser par exemple :
Sub Mise_en_forme() 
Dim feuille As Worksheet 
' 
For Each feuille In Worksheets(Array("Feuil1", "Feuil2","Feuil3","Feuil4")) 
    feuille.Range("A1:H22").Font.Bold = True 
Next feuille 
' 
End Sub


Expérience: nom dont les hommes baptisent leurs erreurs.
Oscar Wilde
0
merci Mr ça marche tres bein je voue remrcier
0