XL pour MAC Module VBA pour suppression de ligne

[Viomlr]

Bonjour à tous,

J'ai eu quelques cours Visual Basic mais pas encore assez pour gérer mon problème.. Je crée une base de donnée générale pour mon entreprise et j'aimerai créer un module VBA pour supprimer les lignes dont la cellule H est vide ?

Pouvez-vous m'aider ? ou m'envoyer le code à inscrire ?

Je vous remercie par avance !

Violette

 

[Robert]

Bonjour Viomlr, bonjour le forum,

Quand on supprime des lignes il faut partir de la fin et remonter mais en fonction de la taille de ta basse de données le code peut-être différent. Sinon le basique (à adapter) :

Sub Macro1()
Dim O As Worksheet
Dim PL As Range
Dim I As Integer

Set O = Worksheets("Feuil1")
Set PL = O.Range("A1").CurrentRegion
For I = PL.Rows.Count To 2 Step -1
    If O.Cells(I, "H").Value = "" Then O.Rows(I).Delete
Next I
End Sub

 

[Viomlr]

Bonjour Viomlr, bonjour le forum,

Quand on supprime des lignes il faut partir de la fin et remonter mais en fonction de la taille de ta basse de données le code peut-être différent. Sinon le basique (à adapter) :

Sub Macro1()
Dim O As Worksheet
Dim PL As Range
Dim I As Integer

Set O = Worksheets("Feuil1")
Set PL = O.Range("A1").CurrentRegion
For I = PL.Rows.Count To 2 Step -1
    If O.Cells(I, "H").Value = "" Then O.Rows(I).Delete
Next I
End Sub

Bonjour Robert,
Bonjour à tous,

Je vous remercie pour votre réponse. Après relecture de ma requête, je me suis aperçu que j'avais parlé de la cellule H, alors que je parlais bien évidemment des cellules dans la colonne H . Et pour répondre à votre question, ma BDD va jusqu'à la ligne 15500. Je vais tout de suite essayer d'adapter votre code

 

[Viomlr]

ça a marché super ! merci pour tout