Supprimer ligne vide via macro dans un champ de cellule

Freeze1981 Messages postés 4 Date d'inscription   Statut Membre Dernière intervention   -  
senecartour Messages postés 391 Statut Membre -
Bonjour,

Je suis sous Excel 2010 et je cherche à supprimer les lignes dans la colonne A dont la valeur de la cellule est vide ou contient "" (semble vide mais contient une formule...). Et ce à partir de la ligne 6 en descendant, car je tiens à garder le haut de la feuille intact.

Merci à qui peut m'aider! :)

2 réponses

  1. Gyrus Messages postés 3360 Statut Membre 526
     
    Bonjour,

    Essaie avec
    Sub Supprimer_Lignes_Vides()
    Dim DerLig As Long, Ligne As Long
    DerLig = Range("A" & Rows.Count).End(xlUp).Row
    For Ligne = DerLig To 6 Step -1
    If Range("A" & Ligne).Value = "" Then Rows(Ligne).Delete
    Next Ligne
    End Sub


    A+
    0
  2. senecartour Messages postés 391 Statut Membre 3
     
    Bonjour,
    Essayez la fonction SUPPRESPACE
    Mettez vous dans la cellule de départ et appliquer la formule
    =SUPPRESPACE(B2)
    Bon courage
    -1