Tableaux et cellule à supprimer automatiquement

veridis

XLDnaute Nouveau
Bonjour,

J'ai un tableaux qui se remplit tout seul mais parfois j'ai des cellules qui restent vides et ça fait des trous dans mon tableaux, je cherche à les enlever. J'ai penser à un filtre mais je ne sais pas comment faire.

Pouvez-vous m'aider ? merciiiiiiiiiiii:)

Exemple :

temps | jour | heure |
1O min|lundi | 10h00 |
ligne qui sert à rien
20 min |jeudi| 11h45|
 

SergiO

XLDnaute Accro
Re : Tableaux et cellule à supprimer automatiquement

Bonjour Veridis,

Un essai par macro.
Pour accéder au VBA : Alt F11
puis tu colles ce code dans ta feuille.

Code:
Sub Suppr_Trous()

Derlig = Range("A65536").End(xlUp).Row
For i = Derlig To 2 Step -1
If Cells(i, 1) = "" Then
Cells(i, 1).EntireRow.Delete
End If
Next i
End Sub

@+
 

Discussions similaires

Statistiques des forums

Discussions
312 081
Messages
2 085 160
Membres
102 800
dernier inscrit
NOTZ