bonjour Dan,Banzai64,le forum
merci pour votre réponse,l'erreur de deltav est supprimée,c'est un peu plus bas maintenant que j'ai l'erreur d'exécution 1004.C'est la ligne k = k + 1": wsR4.Cells(rLig(j), (larg + 1) * (k - 1) +1) = j" ,seul ce qui est entre guillemets est surligné en jaune.
pour Banzai64 effectivement c'est excel 2007
merci