Masquer une ligne si cellule dans tableau est égale à 0

Bonjour a tous,

J'ai un tableau avec des valeurs, je souhaiterais masquer les lignes ou la valeur dans le tableau de B a K est 0.

Ci-joint le fichier avec le tableau.

Merci d'avance

Bonjour

Pas trouvé mieux

Cordialement

C bon ça marche, Merci Beaucoup.

Bonjour

Prends celui-là

Cordialement

Celui la est largement plus rapide à l’exécution. Je prends.

Merci encore

Je remets mon fichier légèrement modifié et sur lequel la macro ne marche pas.

En effet sur le tableau de la Feuil2 ça ne marche pas parce que les valeurs valent bien 0 mais elles sont égales aux valeurs des cellules du tableau de la Feuil1.

Pouvez-vous m'aidez?

Ci-joint le bon fichier.

Merci

Bonjour

Dans le Code précédent, il faut remplacer Count par Sum

Cordialement

Bonjour,

Je viens de tester la macro sur mon fichier et ca ne marche pas et je sais pourquoi.

Sur la ligne de ville1 par exemple, les articles 1, article 2... sont des textes chez moi et il n'y a pas de chiffres. et quand j'applique la macro, j'ai la ligne de la ville qui disparait aussi.

Dans le fichier que vous m'avez envoyé, j'ai modifié article1, article2 par article et ca me fait pareil, la ligne disparait aussi.

Pouvez-vous me modifier le code pour que, même quand il n'y a que du texte, la ligne reste affichée?

Merci

Bonjour

Evidemment, Excel ne pardonne rien!

Si en Feuil1 tu écris "Article " avec une espace à la fin et dans le Code "Article" sans cet espace, il est sur que rien ne se passe....

bon dimanche.

Cordialement

Bonjour,

Merci pour votre réponse.

Mes articles dans mon fichier sont, Pain, Baguette, Croissant...

Comment faire pour que la ligne de la ville avec tous ces articles ne disparait pas quand j'active la macro?

J'avais mis article 1 avec un espace mais j'aurais aussi pu mettre article1 ou article.

Sur le dernier fichier mis j'ai mis article partout sans les chiffres ni les espaces.

Merci encore

Bonjour

Eh "La Boulange", si tu mettais ton VRAI fichier!!

Parce que, à ce rythme, "on" n'est pas encore rendu...

Cordialement

Bonjour

Code Module

Sub Masquer_vides()
Application.ScreenUpdating = False
Sheets("Feuil2").Activate
Dim dlg As Integer, i As Integer
dlg = Range("A" & Rows.Count).End(xlUp).Row
For i = 3 To dlg
If WorksheetFunction.Sum(Range("B" & i & ":K" & i)) = 0 And Range("B" & i).Value <> Range("B3") Then Rows(i).EntireRow.Hidden = True
Next
Range("A1").Select
End Sub

Cordialement

Malheureusement mon fichier est trop lourd pour le mettre sur le forum.

En plus je rencontre des problèmes avec votre macro.

Je peux vous l'envoyer en mp?

Bonjour

oui

s'il est trop lourd; utilise cjoint.com

Cordialement

Je vous ai envoyé le lien du fichier par mp