Bonjour,
Ajoute ces lignes dans ton code
Dim start As Single
'en début de la macro
start = Timer
'Ton code ici ....
....
'avant end sub
MsgBox "durée du traitement: " & Timer - start & " secondes"
Si ok, lors de ta réponse clique sur le V vert à coté du bouton EDITER pour cloturer le fil de discussion
Amicalement