Copie feuille 1 avec bouton, non visible sur feuille 2

Bonjour à l'équipe,

Je voudrais selon l'exemple ci-joint pouvoir copier ma feuille de (Relevés_du_mois), sans que le bouton n'apparaisse sur la 2 ème feuille et que ma feuille (Relevés_du_mois) reste vierge. J'ai déjà créer un bouton en haut à gauche de mon tableau qui me copie la feuille.

Merci de l'aide, que vous pourrez m'apporter.

Cordialement.

Bonjour,

Avec un bouton de commande ActiveX le code de la macro est directement dans le code du bouton.

Bonjour,

voici un exemple,

Sub copyRelevés_du_mois()
Sheets("Relevés_du_mois").Copy After:=Sheets(Sheets.Count)
ActiveSheet.Shapes("Button 1").Delete
End Sub

Bonjour le fil ,bonjour le forum,

P... ! Ils ont bouffés du lion ! Ils sont trop rapides !...

Tant pis j'envoie quand même, même si la seule différence c'est que j'efface toutes les formes (au cas où...).

Sub copyRelevés_du_mois()
Dim F As Shape

Sheets("Relevés_du_mois").Copy After:=Sheets(1)
For Each F In ActiveSheet.Shapes
    F.Delete
Next F
End Sub

Bonjour l'équipe,

Merci à vous, rapidité et efficacité. J'ai retenu la solution de Xmenpl, sa fonctionne comme je le souhaitais.

Je reviendrai vers vous pour d'autres demandes.

Encore merci à tous.

Riko