Bonjour à tous ,
je voudrais supprimer toutes les lignes vides de mon tableau si une cellule de la colonne B est vide ( mais seulement à partir de la cellule B13 )
j'ai essayé ce code mais je ne comprends pas pourquoi lorsque je l'execute ca me dit End if sans bloc If alors que j'ai bien la condition ( il me semble )
Sub Supligne()
Dim I As Long
Dim Plage As Range
Set Plage = Range("B13:E" & Range("B13").End(xlDown).Row)
For I = Plage.Cells.Count To 1 Step -1
Next I
If Plage.Cells(I).Value <> "" Then Plage.Cells(I).EntireRow.Delete
End If
End Sub
Merci pour votre aide,
Cdt,
je voudrais supprimer toutes les lignes vides de mon tableau si une cellule de la colonne B est vide ( mais seulement à partir de la cellule B13 )
j'ai essayé ce code mais je ne comprends pas pourquoi lorsque je l'execute ca me dit End if sans bloc If alors que j'ai bien la condition ( il me semble )
Sub Supligne()
Dim I As Long
Dim Plage As Range
Set Plage = Range("B13:E" & Range("B13").End(xlDown).Row)
For I = Plage.Cells.Count To 1 Step -1
Next I
If Plage.Cells(I).Value <> "" Then Plage.Cells(I).EntireRow.Delete
End If
End Sub
Merci pour votre aide,
Cdt,