Microsoft 365 Impossible de supprimer lignes vides avec Macro VBA

[Fabinou62]

Bonjour à tous,

J'ai une feuille de calcul avec des lignes vides que j'aimerais supprimer, j'ai fais ça :

    Columns("A:D").Select
    Selection.SpecialCells(xlCellTypeBlanks).Select
    Application.CutCopyMode = False
    Selection.EntireRow.Delete

mais ca indique que c'est pas possible pour plusieurs sélections.

Merci d'avance 🙂

 

[Fabinou62]

C'est bon, il suffisait d'indiquer Columns("A:A") , merci quand même 🙂

 

[D.D.]

Bonjour,

Chez moi cela fonctionne correctement de cette manière là:

Columns("A:D").SpecialCells(xlCellTypeBlanks).EntireRow.Delete