bonjour
essaye quelquechose du genre suivant
with workbooks("tonclasseur.xls").sheets("feuil1")
if .range(C8").value<>"" then
.range("C8:F8").copy destination:=workbooks("tonautreclasseur.xls").sheets("feuil1").range("A65536").end(xlup).offset(1,0)
end if
end with