Macro: exporter sans ecraser precedente

bonjour,

je suis nouveau sur votre forum et j ai quelque question a vous posez

Pour mon ecole je dois rendre un projet sous excel j ai choisi de faire la compatibiliter d une entreprise informatique...

je viens de m aventurer dans les macros mais sans resultat!!

j aimerai bien que mon bouton "archiver facture" face une copie de la date, du nom, et du montant total vers la feuille archives sans supprimer ou ecraser la precedente

j espere que vous m avez bien compris

voici le lien :

https://www.excel-pratique.com/~files/doc2/projet_fin.xlsx

en attende de vos reponses

encore merci

Bonjour,

une petite sub pour un archivage sans écrabouillement:

Public Sub ArchivageFacture()
    Dim DateFacture As Date
    Dim NomClient As String
    Dim MontantTotal As Long

    DateFacture = Range("A1")
    NomClient = Range("A2")
    MontantTotal = Range("A3")

    Sheets("Archives").Activate
    'J'ai mis dans la ligne 1 des titres de colonne
    'Si A2 est vide, faire un ".end(xlDown)" positionne à la fin du classeur
    'Alors si A2 est vide, je saute uniquement une ligne sinon je me positionne
    'a la dernière entrée et ensuite je saute une ligne.
    If Not Range("A2") = "" Then Range("A1").End(xlDown).Select
    ActiveCell.Offset(1, 0).Select
    ActiveCell = DateFacture
    ActiveCell.Offset(0, 1) = NomClient
    ActiveCell.Offset(0, 2) = MontantTotal

End Sub

en supposant qu'au lancement de la sub tu est sur la feuille facture, le mieux serait de lier la sub avec un bouton.

encore merci pour ton aide math je viens d essayer et cela fonctionne nikel

Rechercher des sujets similaires à "macro exporter ecraser precedente"