[Catégorie encore modifiée .Net - VBA] aide pour supprimer une ligne vide par r

Question

bonjour,
j'aimerais supprimer les lignes vides dans ma macro en comparant Deux colonnes
par exemple:
[i] 
col A      colB      colC  col
liste 
            nom      prénom etc
*******************************************
Direction
           Dupont  Jean 
           Abadie  Anne
           etc
DirectionB
           Martin Didier
           Farmer  José
******************************************/i
[u]
[i]
les * signifie que la ligne est vide./i/u

J'aimerais  faire en premier savoir le nombres de lignes remplie et vides. il doit s'arrêter après deux lignes vides.
Ma macro marche bien avant de faire la manipulation de supprimer la ligne 
ensuite il faut qu'il vérifie si la colA et B sont vides les deux en mêmes temps.
Cordialement

cs_Jack · Answer

Catégorie encore modifiée .Net -> VBA

Prends soin de bien sélectionner la bonne catégorie, car vu le peu d'information qu'offre ta question, il faut être devin pour savoir que tu bosses sur Excel !

Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés

Le savoir est la seule matière qui s'accroit quand on la partage (Socrate)

givemecookies · Answer

salut,

essayes avec :
Sub RAZ()
    With Range("A:A") 'premiere colonne dans lequel tu veux qu'il regarde les cellules vides
    Set trouver_case = .Find("") ' trouve la première cellule vide
    End With
trouver_case.Select
If ActiveCell.Offset(0, 1) = "" Then ' va regarder si la colonne juste a droite est vide ( à toi de régler )
    ActiveCell.EntireRow.Delete ' supprimer la ligne
End If
    
End Sub

En espérant avoir répondu !
Jennifer

cs_dauphins14 · Answer

bonjour,
le code suivant ne fonctionne pas sur excel2010 Sub RAZ()
    With Range("A:A") 'premiere colonne dans lequel tu veux qu'il regarde les cellules vides
    Set trouver_case = .Find("") ' trouve la première cellule vide
    End With
trouver_case.Select
If ActiveCell.Offset(0, 1) = "" Then ' va regarder si la colonne juste a droite est vide ( à toi de régler )
    ActiveCell.EntireRow.Delete ' supprimer la ligne
End If
    
End Sub

[Catégorie encore modifiée .Net -> VBA] aide pour supprimer une ligne vide par r

3 réponses

Votre réponse

Discussions similaires