Salut Naïka et le forum
Sub test()
Dim X As Long, y
For X = Cells(Rows.Count, "R").End(xlUp).Row To 1 Step -1
If IsError(Cells(X, "R")) Then Rows(X).Delete
Next X
End Sub
Supprimera toutes les lignes contenant une erreur dans la colonne R
Ne connaissance rien d'autre que le sujet, difficile de faire mieux. Malheureusement toutes les erreurs seront supprimées.
Je suggèrerais de traiter ta formule en R pour qu'elle gère l'erreur : = Formule devient
=Si(esterr(Formule);"";Formule) par exemple : on a soit le résultat de la formule soit une cellule vide en cas d'erreur
A+