Supprimer les lignes vides d'une feuille exce

Bonjour,

coment faire pour supprimer les lignes vides d'une feuille excel avec un code vba???

Merciii

1 réponse

  1. Contributeur
    Bonjour,

    un vieux classique:

    Sub supprimer_ligvide()
    Dim derlig As Long
    
    derlig = Range("A65536").End(xlUp).Row
    Range("A1:A" & derlig).SpecialCells(xlCellTypeBlanks).EntireRow.Delete
    End Sub
    0