Bonjour,
ce serait plus facile avec un fichier exemple ou une partie du code ...
Si j'ai bien compris, j'aurai mis, à la fin de la boucle, quelque chose de style :
If IsError(Range("A2")) Then
Msgbox "Problème de valeur en cellule A2"
End
End If
ou en mettant une gestion des erreurs dans la formule de la cellule A2..
RemBabar