Sauvegarde cellule

Bonsoir

J'aurais besoin de conseil vos conseil

Voici mon problème

J'ai des donnés que j'insère dans des cellules EXCEL

colonne A1 = facture

colonne B6 = nom client

et je voudrai enregistrer c'est donnée via une macro qui irai enregistrer c'est donnée dans une autre classeur excel ranger par colonne à la suite

A = facture

B = nom client si vous pouvez m'aider

merci

bonne soirée

Bonsoir,

Une piste :

Sub Enregistrer()

    Dim Cls As Workbook
    Dim Lgn As Long

    'le classeur doit être ouvert. Adapter le nom...
    Set Cls = Workbooks("Base de données.xls")

    'en feuille "Feuil1". Adapter le nom...
    With Cls.Worksheets("Feuil1")

        'première ligne vide en colonne A
        Lgn = .Cells(.Rows.Count, 1).End(xlUp).Row + 1

        'inscrit les valeurs de A1 et B6 de feuille "Feuil1" du classeur actif. Adapter le nom...
        .Range("A" & Lgn).Value = ThisWorkbook.Worksheets("Feuil1").Range("A1").Value
        .Range("B" & Lgn).Value = ThisWorkbook.Worksheets("Feuil1").Range("B6").Value

    End With

End Sub

Hervé.

merci je vais essayer

je vient d'essayer et mais je comprend pas trop comment renseigner la macro d'en dessous

'le classeur doit être ouvert. Adapter le nom...

Set Cls = Workbooks("chiffre.xls")

exemple je doit mettre quoi comme info sur ce paragraphe

merci

Sub Enregistrer()

    Dim Cls As Workbook
    Dim Lgn As Long

    'le classeur doit être ouvert. Adapter le nom...
   Set Cls = Workbooks("chiffre.xls")

    'en feuille "Feuil1". Adapter le nom...
   With Cls.Worksheets("Feuil1")

        'première ligne vide en colonne A
       Lgn = .Cells(.Rows.Count, 1).End(xlUp).Row + 1

        'inscrit les valeurs de A1 et B6 de feuille "Feuil1" du classeur actif. Adapter le nom...
       .Range("A" & Lgn).Value = ThisWorkbook.Worksheets("Feuil1").Range("A1").Value
        .Range("B" & Lgn).Value = ThisWorkbook.Worksheets("Feuil1").Range("B6").Value

    End With

End Sub

Bonjour,

La macro récupère les valeurs situées en cellules A1 et B6 du classeur actif et vas les inscrire dans le classeur de sauvegarde. Pour exécuter cette macro, tu peux soit utiliser un bouton que tu déclenche après avoir renseigner les cellules, soit tu utilse une procédure évènementielle.

Hervé.

Rechercher des sujets similaires à "sauvegarde"