supprimer une ligne vide dans une feuille excel

Question

Bonjour tout le monde!!
J'ai besoin d'aide SVP!!
je cherche une fonction vba qui permet de parcourir toute les lignes d'une feuille excel et supprimer celles qui sont vides!

SVP j'y suis bloqué depuis deux jours mais ça marche pas!! 

Merci d'avance!!

ucfoutu · Answer

Bonjour,
veux-tu bien préciser (car important et traitement très différent dans un cas et dans l'autre) :
- si ligne d'une colonne est vide
ou
- si totalité de la ligne est vide

(simple dans le 1er cas, plus complexe dans le second) .


____________________
Réponse exacte ? => "REPONSE ACCEPTEE" pour faciliter les recherches d'autres forumeurs.
Pas d'aide en ligne installée ? ==> ne comptez pas sur moi pour simplement vous dire ce qu'elle contient

cs_samanta26 · Answer

Bonjour,
je cherche à ce qu'il me supprime toute la ligne s'il trouve une cellule au moins vide!!
merci d'avance!!

ucfoutu · Answer

Réfléchis bien aux conséquences de ta réponse, que tu penses  "précise" :
je cherche à ce qu'il me supprime toute la ligne s'il trouve une cellule au moins vide!! 

En es-tu VRAIMENT certain ? 
Réfléchis deux fois, car sinon... (je te laisse deviner ce qui peut arriver) !
J'attends ta confirmation et si confirmé, je te donne de quoi faire de beaux dégâts.
Réfléchis pendant que je vais faire ma sieste. 

____________________
Réponse exacte ? => "REPONSE ACCEPTEE" pour faciliter les recherches d'autres forumeurs.
Pas d'aide en ligne installée ? ==> ne comptez pas sur moi pour simplement vous dire ce qu'elle contient

cs_samanta26 · Answer

oui je suis sûre :)
j'ai essayé plusieurs macros mais il me sort toujours des erreurs au niveau de Worksheets("feuil1").Range("A65536").End(xlUp).Select 
j'ai remplacé cette commande avec certaines d'autres mais ça n'a pas marché!!
merci :)

ucfoutu · Answer

je cherche à ce qu'il me supprime toute la ligne s'il trouve une cellule au moins vide!! 
et j'ai insisté :
En es-tu VRAIMENT certain ?
Réfléchis deux fois, car sinon... (je te laisse deviner ce qui peut arriver) !
J'attends ta confirmation et si confirmé, je te donne de quoi faire de beaux dégâts. 
et la réponse a été !
oui je suis sûre  
Alors amen.
J'en ai assez de passer en vain par la nécessité de la réflexion !
Tu voulais un code faisant exactement cela, donc !
Le voilà ===>>

 Dim toto As Range, r As Range
 Set toto = Cells.SpecialCells(xlCellTypeBlanks)
 For Each r In toto.Areas
  r.EntireRow.Delete
 Next

Ce qui va se produire va peut-être (je l'espère) être de nature à réfléchir avant de parler, puis de confirmer.
Ce sera un bien, finalement !

Vas-y donc === >> ce code  efface bien toute ligne qui contiendrait une cellule vide  !

Un conseil (le dernier) : si c'est ta feuille de travail réelle, fais-en une sauvegarde, hein ... Tu vas en avoir probablement un sacré besoin.  

Désolé d'en arriver là, mais je suis fatigué par les approximations de ce genre, trop fréquentes, qui dénotent plus une lacune de la pensée qu'une lacune de code ! 


____________________
Réponse exacte ?  => "REPONSE ACCEPTEE" pour faciliter les recherches d'autres forumeurs.
Pas d'aide en ligne installée ? ==> ne comptez pas sur moi pour simplement vous dire ce qu'elle contient

cs_samanta26 · Answer

merci pour l'aide!!

ucfoutu · Answer

Tu veux rigoler ou quoi ?
Le code que je t'ai donné (et qui correspond exactement à ce que tu as défini malgré mon insistance) supprimera toutes les lignes de ton classeur dont une seule cellule serait vide !
C'est à dire toutes les lignes, sauf si toutes tes cellules de cette ligne sont remplies de la colonne A à la toute dernière colonne possible de Excel (ce qui veut dire 16384 colonnes remplies, par exemple, sur Excel 2007).
Mais ma foi ... t'as peut-être un énorme classeur, rempli comme un oeuf 
et en admettant même que tu en aies moins que 16384 possibles, car sous avant version 2007, malheur à celui qui lancera ton classeur un jour sous 2007 ou supérieur ===>> il n'aura plus rien !


____________________
Réponse exacte ? => "REPONSE ACCEPTEE" pour faciliter les recherches d'autres forumeurs.
Pas d'aide en ligne installée ? ==> ne comptez pas sur moi pour simplement vous dire ce qu'elle contient

Supprimer une ligne vide dans une feuille excel

7 réponses

Votre réponse

Discussions similaires