Macro créer une copie et supprimer feuille active

Bonjour le forum,

j'ai essayé d'adapter une macro enregistrée mais je n'y suis pas arrivé!

Une macro qui copie la feuille active(déplacer créer une copie)

et une macro qui supprime la feuille active.

Mes macros font ces actions mais avec la même feuille (feuil1) :

Sub deplacercopier()

Sheets("Feuil1").Select

Sheets("Feuil1").Copy Before:=Sheets(1)

End Sub

Sub supprimer

Sheets("Feuil1").Select

ActiveWindow.SelectedSheets.Delete

End Sub

Bonsoir

Sub copie()
ThisWorkbook.ActiveSheet.Copy
End Sub

Sub efface()
ThisWorkbook.ActiveSheet.Delete
End Sub

cordialement

Merci maguetlolo

la macro [copie] copie la feuille dans un nouveau classeur, je veux juste copier la feuille active dans le même classeur, par contre la macro [efface] fonctionne correctement.

Bonjour,

ActiveSheet.Copy after:=Activesheet

A mon avis, tu vas avoir d'autres questions...

A te relire

Dan

Super merci Nad-Dan

c'est ce que je voulais!

J'ai effectivement une autre question mais je la met sur un autre fil c'est autre chose...

encore merci