Macro Excel supprimer les lignes vides d'une autre feuille

[benadry]

Bonjour le forum,


J'ai trouvé une petite macro qui permet de supprimer les lignes vides de la feuille Excel active :

Sub Supprimer_les_lignes_vides()


 Range("A1:A65536").SpecialCells(xlCellTypeBlanks).EntireRow.Delete
 
End Sub

La feuille dont je veux supprimer les lignes pouvant changer, je veux mettre la macro sur une autre feuille et l'exécuter au moyen d'un bouton.

La feuille dont je veux supprimer les lignes est toujours la dernière.

Son nom est extrait dans la cellule d'une autre feuille (feuille Immos, cellule AG2).

Je suppose qu'il faut passer par l'instruction With Sheet ..., mais je n'arrive pas à trouver la bonne syntaxe.

Qualqu'un pourrait-il m'aider ?

Merci d'avance.

Cordialement.

 

[Pierrot93]

Re : Macro Excel supprimer les lignes vides d'une autre feuille

Bonjour,

La feuille dont je veux supprimer les lignes est toujours la dernière.

essaye peut être ceci alors :

Sheets(Sheets.count).Range("A1:A65536").SpecialCells(xlCellTypeBlanks).EntireRow.Delete

bonne journée
@+

 

[benadry]

Re : Macro Excel supprimer les lignes vides d'une autre feuille

Bonjour Pierrot,

Merci pour ton aide.

Ca marche très bien.

A +