Affecter macro à 1 feuille

Bonjour à tous,

j'aurais besoin de votre aide,

Je débute en VBA et réalise des macro assez simples.

Ma macro ci-dessous fonctionne et va chercher des noms d'onglets et des montants en € dans ces onglets, ce qui me permet de faire un récapitulatif en 1 clic de ces onglets sur ma page de garde où j'ai créé un bouton pour la macro

Le problème c'est que la macro se lance automatiquement à l'ouverture du classeur excel et donc si je n'ai pas sauvegardé et fermé le classeur en restant sur la page de garde, alors la macro se lancera sur l'onglet visible en ouverture du fichier.

Question : Comment modifier ma macro pour lui indiquer qu'elle doit créer ce récap uniquement dans ma page de garde dont le nom est "HAGA"?

Cordialement, merci par avance

Alex.

Sub Snamelist3()

Range("B20").Select

For i = 2 To Sheets.Count

ActiveCell.Value = Sheets(i).Name

ActiveCell.Offset(1, 0).Select

Next i

Range("C20").Select

For i = 2 To Sheets.Count

ActiveCell.Value = Sheets(i).Range("E57").Value

ActiveCell.Offset(1, 0).Select

Next i

End Sub

Bonjour

il faut activer la feuille désirée au tout debut de la macro :

sheets("HAGA").activate

fred

Edit :

voir on peut simplifier ton code :

Sub Snamelist3()
dim i as byte
For i = 2 To Sheets.Count
Sheets("HAGA").Cells(18 + i, 2) = Sheets(i).Name
Sheets("HAGA").Cells(18 + i, 3) = Sheets(i).Range("E57").Value
Next i
End Sub

Salut !

Je vais essayer tout de suite.

1000 mercis !

Alex.

MàJ

ça fonctionne parfaitement, encore merci !

Cordialement,

Alex

SI la réponse correspond a la demande merci de clore le post

fred