bouton creation nouvelle feuille

jcc · 10 Février 2003

bonjour a tous

j'aimerais creer un bouton macro qui , lors de son activation
,creera automatiquement la copie de la feuille1 en feuille 1(2) , sans oublier d'effacer les données entrées automatiquement sur la feuille 1
merci de me dire si cela est possible et de m indiquer le code a utiliser

merci

andré · 10 Février 2003

Salut jcc,

Enregistre la macro et tu auras le code.
Après avoir copié et sélectiuonné ta feuille, tu fais F5, Cellules, Constantes, OK, Delete.

André

sousou · 10 Février 2003

Ce petit code devrais te satisfaire, ce n'est qu'un exemple de soultion.
Laisse aller ton imagination.

Sub copie()
Set modèle = ThisWorkbook.Worksheets("feuil1")
modèle.Copy after:=modèle
ActiveSheet.UsedRange.ClearContents
ActiveSheet.Name = InputBox("Nom de la nouvelle feuille :")

End Sub

bouton creation nouvelle feuille

jcc

Guest

andré

Guest

sousou

Guest

Discussions similaires