Discussion :

[Senelya]

Bonjour,

Comment peut-on supprimer les lignes d'une feuille qui ont l'erreur "#VALEUR!" dans les colonnes G ou I.

Je voulais faire :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
With Worksheets("Tab1")
 
    Set Plage = Range("G2:I400")
    On Error Resume Next
    If Not Cible Is Nothing Then MsgBox Cible.Address(0, 0)
 
End With

Mais ca ne fonctionne pas.
Merci par avance pour votre aide.

[Senelya]

Bon eh bien en fait j'ai trouvé toute seule ... Enfin, par si c'est une erreur mais s'il y a une certaine chaine de caractère tel que 0 ici.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Sub EnleverLesErreurs()
 
Dim i As Long
 
For i = Range("G65536").End(xlUp).Row To 2 Step -1
    If UCase(Cells(i, 7).Value) Like UCase("0") Then Rows(i).Delete
Next i
 
End Sub