Une macro qui copie des données d'une feuille a l'autre

[robertpellan]

allo
j ai cette macro qui copie des données mais pas a la bonne place

elle copie effectivement de la feuille saisie a la feuille transactions mais pas dans le tableau . Elle copie plutôt a la fin du tableau contenu dans transactions. De plus elle ne conserve pas le format date …

ci dessous le code utilisé et j inclus le fichier excel
Code :Sub ajouter_opération()
’
’ ajouter_opération Macro
’

’
Sheets(« Saisie »).Range(« A2:G2 »).Select

Selection.Copy
Sheets("DB").Select
Range("A1").End(xlDown).Offset(1, 0).Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
    :=False, Transpose:=False
Sheets("Saisie").Select
Range("I11").Select
Application.CutCopyMode = False
Selection.ClearContents
Range("K11").Select
Selection.ClearContents
Range("G15").Select
Selection.ClearContents
Range("K15").Select
Selection.ClearContents
Range("I15").Select
Selection.ClearContents
Range("K15").Select
Selection.ClearContents
Range("M11").Select
Selection.ClearContents
Range("j18").Select
Selection.ClearContents

End Sub
protopype.xlsx (28,0 Ko)

[FFO]

Bonjour

Ci-joint ma proposition

J’ai intégré dans ton fichier une macro qui recopie les données de l’onglet « Saisie » présentes dans l’onglet « TRANSACTIONS » et ce dans la première ligne libre du tableau
J’ai relié le bouton « Ajouter » onglet « Saisie » sur ce traitement
Le fichier est de type xlsm pour permettre l’intégration du code VBA

Fais des tests et dis moi

protopype.xlsm (34,1 Ko)

[robertpellan]

Merci beaucoup ca fonctionne comme je le souhaite sauf une petite ligne de code qui manque a la fin et que je n arrive pas a créer :
il s’agirait d’effacer le contenu des cellules de la feuille saisie une fois la copie effectuée dans transaction
Serais tu assez gentil de me dire quoi écrire dans le code ?

J’apprécie énormément ton aide et t en remercie

[FFO]

Désolé pour cet oubli
C’est réparé dans ce fichier joint
N’oublies pas de valider ma réponse si elle te convient
Donnes moi des nouvelles

protopype.xlsm (33,1 Ko)

[robertpellan]

Vpus n’avez pas a être désolé , vous m’avez beaucoup aidé et je vous en remercie
je valide la reponse en appuyant sur SOLUTION et sur le Coeur !
Merci encore

[FFO]

Merci beaucoup pour le retour
Ravi que cela te convienne
A ta disposition si besoin
Au plaisir