Bouton d'enregistrement

[Tempio]

Bonjour à tous, j'aurais besoin de votre aide svp. En fait, j'aimerais pouvoir ajouter un bouton à la fin de mon tableau qui me permettra d'enrégistrer les changements effectués sur la facture (feuille Facture). De telle sorte que lorsque la facture a été modifiée avec les informations d'un client, en cliquant sur le bouton enregistrer, cela puisse me créer une nouvelle feuille de calcul avec les données de la facture en cours.

Merci d'avance et j'espère avoir été claire.

 

[Tempio]

Re : Bouton d'enregistrement

Ok, mais ya t'il quelqu'un qui pourrait m'aider a créer une macro qui me permettrait djà de créer une nouvelle feuille de calcul ? Après je chercherai comment copie le contenu d'une feuille vers une autre (toujours avec le meme bouton). Merci d'avance....

 

[phlaurent55]

Re : Bouton d'enregistrement

Bonjour Tempio,

voici le code pour créer une nouvelle feuille et la nommer "Nouvelle_Feuille"
et ensuite copier la feuille 1 dans la nouvelle feuille qui viens d'être créée

Sub Macro1()
    Sheets.Add After:=Sheets(Sheets.Count)
    Sheets(Sheets.Count).Name = "Nouvelle_feuille"
    ' si la feuille à recopier est la feuille 1
    Sheets("Feuil1").Select
    Cells.Select
    Selection.Copy
    Sheets("Nouvelle_feuille").Select
    Range("A1").Select
    Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _
        False, Transpose:=False
End Sub

à+
Philippe