Suppression de lignes sur vba/excel

francois -
michel_m Messages postés 16602 Date d'inscription Statut Contributeur Dernière intervention - 5 janv. 2010 à 10:23

Bonjour,
Sur excel, j'ai un tableau de données parmi lequel des lignes vides sont aléatoirement insérées.
J'aimerais supprimer ces lignes vides de la manière suivante:

existant :
1111

2222

33333

Souhaité:
1111
2222
3333

Pourriez vous m'aidez pour définir le bon code, j'avais écrit :

For i = 1 To 8

If Range("A1").Offset(i - 1) = "" Then Row(i - 1).Delete Shift:=xlUp

Next i

Mais ca ne marche pas...

Merci pour votre aide

A voir également:

Suppression de lignes sur vba/excel
Forcer suppression fichier - Guide
Liste déroulante excel - Guide
Aller à la ligne excel - Guide
Word et excel gratuit - Guide
Comment trier par ordre alphabétique sur excel - Guide

1 réponse

Réponse 1 / 1

michel_m Messages postés 16602 Date d'inscription Statut Contributeur Dernière intervention 3 314

Re,

Sub virerligvide()
Dim derlig As Long

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

Discussions similaires

Afficher toutes les lignes masquées excel

remettre toutes les colonnes et les lignes masquées

Votre réponse

Discussions similaires