Supprimer une forme (copie VBA)

[stefVB_Excel]

Bonsoir à toutes et tous,

j'ai un classeur de plusieurs feuil, une que je copie dans un nouveau classeur dans lequel je ne veux pas la forme qui me sert de bouton.
j'ai essayé plusieurs macro mais je n'arrive pas à mes fins

classeur joint avec la macro

merci par avance

stef

 

[JCGL]

Re : Supprimer une forme (copie VBA)

Bojour à tous,

Rajoute :

  ActiveSheet.DrawingObjects.Delete

A+

Edition : Salut PJ ;-)

 

[pierrejean]

Re : Supprimer une forme (copie VBA)

bonjour Stef

A tester:

Sub savecopy()
 'stefVB_Excel
 '
MonNom = ActiveWorkbook.Name
MaFeuille = ActiveSheet.Name
Workbooks.Add
Workbooks(MonNom).Sheets(MaFeuille).Cells.copy Destination:=Range("A1")
Application.CutCopyMode = xlCopy
Range("a1").Select
ThisWorkbook.Close
End Sub

Edit : salut JC

 

[stefVB_Excel]

Re : Supprimer une forme (copie VBA)

Merci pour la réponse

JCGL cela fonctionne parfaitement, copie de la feuil dans un nouveau classeur


PierreJean cela fonctionne pour la copie sans me retirer la forme.
la nouvelle copie ce fait sur le classeur entier avec les feuilles.
mais je garde le code il peut me servir à autre chose pourquoi pas, je continue de découvrir VBA avec passion


merci encore @+ sur le forum

Stef