Supprimer ligne d untableu si...

[nicroq]

bonsoir a tous,

voici mon problème, je souhaiterai par VBA supprimer une ligne d un tableau si et seulement si toutes les valeurs de la ligne sont égale à 0.

merci pour votre aide

bonne soirée

 

[mapomme]

Bonsoir nicroq,

Difficile de proposer quelque chose qui soit adapté à ton cas précis puisqu'aucun fichier n'est fourni.
Une piste :

• parcourir le tableau de la dernière ligne à la première
• pour chaque ligne, faire la somme des valeurs absolues des cellules de la ligne
• si cette somme est nulle, on efface la ligne
• on passe à la ligne suivante

Voir un exemple dans le fichier joint.

edit : bonsoir arthour973 🙂.

rem : la méthode charge le tableau en mémoire ; elle est donc relativement rapide. Si le tableau est très grand, le chargement du tableau en mémoire peut être limité par la quantité de RAM disponible. Dans ce cas, utiliser la méthode du post #5 est possible.

 

[Usine à gaz]

Bonsoir Nicroq, mapomme, le forum,

Un essai de profane 😉
Bonne nuit à toutes et à tous,
Amicalement,
Lionel,

 

[zebanx]

Bonsoir,

Une autre méthode qui éviterait de passer par un total d'absolus :
- remplacement des 0 par ""
- suppression des lignes vides
- remise des 0 sur les cellules "" restantes du tableau
Cdlt

 

[mapomme]

Re,

Une autre méthode avec colonnes auxiliaires temporaires.

edit : une version V2a corrigeant un bug quand il n'y a qu'une seule ligne de données.

 

[nicroq]

Vraiment merci a tous pour vos solution diverse et varié et toute efficace
bonne soirée

 

[nicroq]

Cependant je n'arrive pas a adapter le code lorsque mon tableau se trouve en mileu de tableur avec la methode de barbatruc..
POurriez vous m'aider avec l exemple de tableau du fichier joint?

merci d avance !!!!

 

[nicroq]

personne pour m aider...

 

[mapomme]

Bonsoir nicroq,

Voir le fichier joint.

 

[gosselien]

Bonjour,

faire un total en bout de ligne, trier sur cette colonne et supprimer les lignes à zéro !

P.

 

[nicroq]

Merci bcp ma pomme, je comprend mieux mon erreur maintenant sur le code pour un tableau en milieu de tableau!
bon week end a tous et encore merci