Pédro ça fonctionne presque, sauf qu'il me le fait sur la feuille ou ya mon bouton est non la feuille "SUIVTRANS EN COURS"
Ah !! Précision trèèèès utile ! J'ai trouvé, il te manque un "." :
.Range("L3").Copy Destination:=Range("L3:L" & d)
'devient
.Range("L3").Copy Destination:=.Range("L3:L" & d)