Supprimer une ligne

[MARIE74]

Bonjour a toutes et a tous

Météo soleil que du bonheur

Petite aide

J'ai un tableau 8 colonnes (55000 lignes)

Je souhaite si une cellule vide dans colonne F = suppression de la ligne

Exemple: si F22 est vide toute la ligne 22 est supprimée

D'avance merci

 

[vbacrumble]

Re : Supprimer une ligne

Bonsoir

Sub supprimeVIDECOLF()
Columns("F:F").SpecialCells(xlCellTypeBlanks).EntireRow.Delete
End Sub

PS: Cela peut aussi être fait manuellement
1) Sélectionner F1 puis faire CTRL+T
2) Dans référence: F1:F55000
3) A nouveau CTRL+T et cocher Cellules vides
4) Edition/Supprimer ligne entière

 

[MARIE74]

Re : Supprimer une ligne

Bonsoir

Sub supprimeVIDECOLF()
Columns("F:F").SpecialCells(xlCellTypeBlanks).EntireRow.Delete
End Sub

Merci vbacrumble

C'est parfait
Un grand merci

Bonne soirée a tous