Infos macro

Bonjour,

encore besoin de mes très chers amis de excel downloads.
Cette fois-ci, je veux créer un bouton qui me permettent simplement de copier un case de la feuille 1 dans une autre case de la feuille 2.
Le code macro marche mais quand je l'applique au bouton, ya de nouveau un bug:

Sub titre()
'
' titre Macro

'
'
Application.CutCopyMode = False
Selection.Copy
Sheets("Feuil2").Select
Range("D4:L4").Select
ActiveSheet.Paste
End Sub

Il bug à range, donc si vous pouvez m'aider, merci bien.

Bye