Creer une macro pour copier des infos d'un tableau Excel a un autre

Bonjour

J'ai des données contenues dans un onglet ( nom de onglet est AUTO )et je veux copier par macro ces données vers un autre onglet ( nom de cet onget est DATABASE)

Code utilisé et qui ne fonctionne pas :

Sheets("Auto").Range("A4:I4").Select

Selection.Copy
Sheets("database").Select
Range("a1").End(xlDown).Offset(1, 0).Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Sheets("Auto").Select
Range("A2").Select
ActiveSheet.Paste
Application.CutCopyMode = False

End Sub

Edit modo : code à mettre entre balises avec le bouton </> merci d'y faire attention la prochaine fois

Au moment d el'rxécution de cette macro je recois un message d'erreur

Bonjour

Un essai à tester. Te convient-il ?

Bye !

Merci beaucoup

ca fonctionne

bonne année 2024