La conversion du type 'Plage' vers le type 'Chaîne' n'est pas valide

Dim i As Integer For i = int_start To 1 Step -1 If InStr(rng_delete.Cells(i), "VALUE") > 0 Then rng_delete.Cells(i).EntireRow.Delete() End If Next i 

Une exception non gérée du type 'System.InvalidCastException' s'est produite dans Microsoft.VisualBasic.dll.
Informations complémentaires: La conversion du type 'Plage' vers le type 'Chaîne' n'est pas valide.

Vous devez spécifier la propriété de la cellule que vous passez à InStr (généralement soit .Value ou .Text).

 If InStr(rng_delete.Cells(i).Text, "VALUE") > 0 Then