Une macro qui copie colle d'Une feuille a l'autre

Bonjour

ci dessous une macro qui devrait me permettre de copier des valeurs a partir de la feuille SAISIE vers la feuille TRANSACTIONS

La macro fait le travail mais pas a mon gout !!

je voudrais que la copie se fasse DANS le tableau excell et non APRES le tableau

je voudrais aussi que le format date soit conservé 

Merci du coup de pouce !!

la macro est: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

PS J'aurais aimé inclure le fichier excell mais je ne trouve pas comment faire