Archiver des données dans Excel

[LocSta]

Salut tout le monde.
Voila mon pb: J'ai créée une feuille de saisie de données et j'aimerai pouvoir archiver ces données dans une auters feuille à l'aide d'une macro. La macro créerai un enregistrement (une nouvelle ligne) dans une autre feuille.
Le seul probleme c'est que je suis absolument nul en macro, en général j'arrive à m'en sortir avec les formules mais là je doute que je puisse le faire, si vous avez le temps de regarder mon fichier et éventuellement de me proposer votre aie ou une macro, merci. J'espére avoir était assez préci, si vous avez des question n'hésiter pas.

 

[Pierrot93]

Re : Archiver des données dans Excel

Bonsoir Locsta

regarde ton fichier en retour, en supposant que la ligne 1 de ta feuille archie soit renseignée.

bonne soirée
@+

 

[CBernardT]

Re : Archiver des données dans Excel

Bonjour LocSta et pierrot93,

Regardes si cela te convient.

Cordialement

Bernard

 

[Eric 45]

Re : Archiver des données dans Excel

Bonjour à tous
Bonjour LocSta

Essaye ce code :

Option Explicit
Dim a As Integer
Dim ligne As Integer

Sub copie()
ligne = Worksheets("Archive").Range("A65536").End(xlUp).Row + 1
If ligne = 2 Then ligne = 3
Worksheets("Archive").Range("A" & ligne).Value = ligne - 2
Worksheets("Archive").Range("B" & ligne & ":F" & ligne).Value = Worksheets("Saisi").Range("A3:E3").Value
a = 1
For i = 6 To 34
    Worksheets("Archive").Cells(ligne, i + a).Value = Worksheets("Saisi").Cells(3, i).Value
    a = a + 1
Next i
Worksheets("Saisi").Range("C3:T3").ClearContents
End Sub

Dis nous

Eric

PS pb rafraichissement (internet) Bonsoir Pierre et Bernard

 

[LocSta]

Re : Archiver des données dans Excel

Merci à tous de votre aide, ça marche nikel!!! Encore une fois merci, le proleme de l'archivage est résolu. Si ça vous intéresse j'ai laisser un autre post toujours pour le meme fichier mais pour un probleme de liste de selection. Merci pour aide. Tchuss

 

[ChTi160]

Re : Archiver des données dans Excel

Salut LocSta
Bonjour le Fil
Bonjour le Forum

j'ai suivi le fil et je me pose une question .
Y a t'il toujours qu'une ligne à transférer ?

Bonne fin de Journée

 

[LocSta]

Re : Archiver des données dans Excel

Il y a plusieur lignes mais sa ne pose pas de probleme particulier à les saisir une à une, car dans tout les casil faut les saisir, par contre j'ai un autre soucipar rapport aux listes déroulante voir fichier joint ou fil suivant:
https://www.excel-downloads.com/threads/pb-liste-de-selection.78534/