Microsoft 365 Impossible de supprimer lignes vides avec Macro VBA

Fabinou62 · 7 Juillet 2020

Bonjour à tous,

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

VB:

    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

D.D. · 7 Juillet 2020

Bonjour,

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

VB:

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

Fabinou62 · 7 Juillet 2020

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

D.D. · 7 Juillet 2020

Bonjour,

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

VB:

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