Rapport de message :*
 

ACTIVER UNE MACRO POUR PLUSIEURS FEUILLES

Titre du sujet : ACTIVER UNE MACRO POUR PLUSIEURS FEUILLES
par fredya le 20/11/2012 20:15:04

Bonsoir,

J'ai créé une macro et j'aimerai que cette macro s'active automatiquement sur toutes les feuilles créées juste en cliquant sur un bouton.

Sans être obligée d'aller sur chaque feuille pour activer la macro. j'ai au moins 200 feuilles.


Dim Varsomme As Long


Range("H10").Select

Do

If Selection.Interior.ColorIndex = 15 Then
Varsomme = Varsomme + ActiveCell.Value

End If

ActiveCell.Offset(0, 1).Select

Loop Until ActiveCell.Value = "."

Range("I46").Value = Varsomme



End Sub

Pouvez-vous m'aider svp?

fredya.