Bonjour,

Je suis débutant en vba et je voulais savoir si quelqu'un pouvais m'aider?
En effet j'ai essayer de réaliser une macro de suppression de ligne.
Malheureusement, ma macro supprime certaine ligne ou la cellule B est vide mais pas toute.
Je suis donc obliger de relancer plusieurs fois la macro pour qu'elle les supprimes entièrement.

Voici ma macro :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Sub supp()
 
Dim fl As Worksheet
Sheets("F203170862086_ZADVS02C-89.23505").Select
 
 
Dim cell As Range
 
For Each cell In Range("B1:B20000")
If cell.Value = "" Then
cell.EntireRow.Delete Shift:=xlUp
 
End If
 
Next cell
 
End Sub
Je vous remercie par avance de votre aide.