Executer un seul macro pour plusieurs feuille

ilies -  
 ilies -
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 928 Statut Membre 289
 
Bonsoir,
Et que veux-tu faire ?
0
ilies
 
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 928 Statut Membre 289
 
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
ilies
 
merci Mr ça marche tres bein je voue remrcier
0