Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

masquer des lignes avec une condition

Créer une discussion

Initiateur de la discussion jpm2169
Date de début 11 Décembre 2006

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire

J

jpm2169

Guest

11 Décembre 2006

#1

Bonjour,

Je viens vous voir ce soir parce que je suis à la recherche d'une solution pour masquer des lignes.

Dans une feuille, j'ai plusieurs tableaux.
Dans chaque tableau, j'ai un total en colonne D depuis la ligne 25 jusqu'à la ligne 50 qui peut être égale à 0.

Je voudrais que la ligne dont le total en colonne D est égale à 0 se maque, ou s'affiche après modification du total si celui ci devient différent de 0.
Comment faire ?

Merci pour votre aide.

(J'ai lu bien des post qui traite du masquage de lignes mais les essais que j'ai réalisé grâce à ces aides n'ont pas abouti car je n'ai sans doute pas réussi à adapter.)

Trier par date Trier par votes

G

Guillaumega

XLDnaute Impliqué

11 Décembre 2006

#2

Re : masquer des lignes avec une condition

Bonsoir,
Cela ne répond pas exactement à ta problématique, mais pense éventuellement à faire ceci:
si total = 0 alors "" sinon total.

A+

Vote positif 0 Vote négatif

J

jpm2169

Guest

11 Décembre 2006

#3

Re : masquer des lignes avec une condition

Guillaumega à dit:
QUOTE]

Merci pour ta réponse mais cela ne masque pas les ligne à 0. J'essaie de voir avec un code 1 ou "" en fonction du total sur chaque ligne mais je n'arrive à rien.

J'ai du mal avec les "commandbutton"

J'essaie ça mais ça ne fonctionne pas :

Private Sub CommandButton1_Click()
For i = 2 To Range("L65536").End(xlUp).Row
If Now() - Cells(i, 1) * 1 = 0 Then
Rows(CStr(i) & ":" & CStr(i)).Select
Selection.EntireRow.Hidden = True
End If
Next i
End Sub

Vote positif 0 Vote négatif

J

jpm2169

Guest

11 Décembre 2006

#4

Re : masquer des lignes avec une condition

jpm2169 à dit:
J'essaie ça mais ça ne fonctionne pas :

Private Sub CommandButton1_Click()
For i = 2 To Range("L65536").End(xlUp).Row
If Now() - Cells(i, 1) * 1 = 0 Then
Rows(CStr(i) & ":" & CStr(i)).Select
Selection.EntireRow.Hidden = True
End If
Next i
End Sub

Par contre, ça , ça fonctionne :
Private Sub CommandButton1_Click()

Dim cel As Range
For Each cel In Range("L:L")
If cel = "0" Then
cel.EntireRow.Hidden = True
End If
Next
End Sub

Mais lorsque je modifie et que la valeur devient différente de 0, j'ai beau cliquer sur le bouton de commande, les lignes masquées lors du premier résultat (celui égale à 0), ne réapparaissent pas.

Vote positif 0 Vote négatif

J

jpm2169

Guest

11 Décembre 2006

#5

Re : masquer des lignes avec une condition

jpm2169 à dit:
Par contre, ça , ça fonctionne :
Private Sub CommandButton1_Click()

Dim cel As Range
For Each cel In Range("L:L")
If cel = "0" Then
cel.EntireRow.Hidden = True
End If
Next
End Sub

Mais lorsque je modifie et que la valeur devient différente de 0, j'ai beau cliquer sur le bouton de commande, les lignes masquées lors du premier résultat (celui égale à 0), ne réapparaissent pas.

J'ai oublié de dire que la colonne retenue est maintenant la colonne L et que mes tableaux débutent à la ligne 17.

Pour réafficher les lignes avant remasquage des ligne à 0, j'ai fait ça :

Private Sub CommandButton1_Click()

Rows("17:17").Select
Range(Selection, Selection.End(xlDown)).Select
Range(Selection, Selection.End(xlDown)).Select
ActiveWindow.SmallScroll Down:=6
Selection.EntireRow.Hidden = False

For i = 19 To Range("a65536").End(xlUp).Row
If Now() - Cells(i, 1) * 1 = 0 Then
Rows(CStr(i) & ":" & CStr(i)).Select
Selection.EntireRow.Hidden = True
End If
Next i
End Sub

Mais ça ne fonctionne pas. Pourquoi ?

Merci

Vote positif 0 Vote négatif

G

Guillaumega

XLDnaute Impliqué

11 Décembre 2006

#6

Re : masquer des lignes avec une condition

jpm2169 à dit:
Par contre, ça , ça fonctionne :
Private Sub CommandButton1_Click()

Dim cel As Range
For Each cel In Range("L:L")
If cel = "0" Then
cel.EntireRow.Hidden = True
End If
Next
End Sub

Mais lorsque je modifie et que la valeur devient différente de 0, j'ai beau cliquer sur le bouton de commande, les lignes masquées lors du premier résultat (celui égale à 0), ne réapparaissent pas.

J'ai pourtant l'impression que ça, ça fonctionne... Non???

Sub alacon()
Dim cel As Range
For Each cel In Range("L:L")
If cel = "0" Then
cel.EntireRow.Hidden = True
ElseIf cel <> "0" Then
cel.EntireRow.Hidden = False
End If
Next
End Sub

Dernière édition: 11 Décembre 2006

Vote positif 0 Vote négatif

J

jpm2169

Guest

11 Décembre 2006

#7

Re : masquer des lignes avec une condition

Guillaumega à dit:
J'ai pourtant l'impression que ça, ça fonctionne... Non???

Sub alacon()
Dim cel As Range
For Each cel In Range("L:L")
If cel = "0" Then
cel.EntireRow.Hidden = True
ElseIf cel <> "0" Then
cel.EntireRow.Hidden = False
End If
Next
End Sub

Je sais pas, je vais essayer mais il est bizarre le nom du Sub...lol
j'ai fait comme ça :

Sub encoralacon()

Cells.Select
Selection.EntireRow.Hidden = False

Dim cel As Range
For Each cel In Range("L17:L65536")
If cel = "0" Then
cel.EntireRow.Hidden = True
End If
Next
End Sub

J'essaie la tienne.

Merci... Très sympas de ta part

Vote positif 0 Vote négatif

G

Guillaumega

XLDnaute Impliqué

11 Décembre 2006

#8

Re : masquer des lignes avec une condition

jpm2169 à dit:
Je sais pas, je vais essayer mais il est bizarre le nom du Sub...lol
j'ai fait comme ça :

Sub encoralacon()

Cells.Select
Selection.EntireRow.Hidden = False

Dim cel As Range
For Each cel In Range("L17:L65536")
If cel = "0" Then
cel.EntireRow.Hidden = True
End If
Next
End Sub

J'essaie la tienne.

Merci... Très sympas de ta part

Dis moi si la mienne fonctionne s'il te plait... mdr

Vote positif 0 Vote négatif

J

jpm2169

Guest

11 Décembre 2006

#9

Re : masquer des lignes avec une condition

Guillaumega à dit:
Dis moi si la mienne fonctionne s'il te plait... mdr

Ben le probleme, c'est que ça va chercher jusqu'à la ligne 65536 tout ce qui est différent de 0 pour afficher. Je pense qu'il faut une autre condition mais laquelle ?

Vote positif 0 Vote négatif

G

Guillaumega

XLDnaute Impliqué

11 Décembre 2006

#10

Re : masquer des lignes avec une condition

jpm2169 à dit:
Ben le probleme, c'est que ça va chercher jusqu'à la ligne 65536 tout ce qui est différent de 0 pour afficher. Je pense qu'il faut une autre condition mais laquelle ?

bah si tu travailles de la ligne L17 à L50, tu mets L17:L50 au lieu de L:L

Bah de toutes les facons je suis nul... Dommage ca aurait été champagne (première fois que j'aurai aidé en vba) lol

Vote positif 0 Vote négatif

J

jpm2169

Guest

11 Décembre 2006

#11

Re : masquer des lignes avec une condition

Guillaumega à dit:
bah si tu travailles de la ligne L17 à L50, tu mets L17:L50 au lieu de L:L

Bah de toutes les facons je suis nul... Dommage ca aurait été champagne (première fois que j'aurai aidé en vba) lol

Oui, comme ça, ça fonctionne très bien.

Merci et bonne nuit

Vote positif 0 Vote négatif

G

Guillaumega

XLDnaute Impliqué

11 Décembre 2006

#12

Re : masquer des lignes avec une condition

jpm2169 à dit:
Oui, comme ça, ça fonctionne très bien.

Merci et bonne nuit

Cool Bonne nuit à vous aussi

Vote positif 0 Vote négatif

Identifiez-vous ou inscrivez-vous pour participer.

Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !

- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

H

Question

XL 2019 Masquer des lignes sous condition en vba

Réponses: 8

Affichages: 297

7 Décembre 2025

job75

Y

Question

XL 2019 Masquer automatiquement des lignes selon la valeur d'une cellule ?

Réponses: 2

Affichages: 559

10 Juillet 2025

Yogean

Y

Résolu(e)

Microsoft 365 Powerquery - Total par Compte / lignes en insérant des colonnes

Réponses: 5

Affichages: 346

13 Novembre 2024

chris

Question

Microsoft 365 créer des feuilles automatiques et une formule avec condition de remplissage

Réponses: 2

Affichages: 416

16 Mai 2025

luno123

R

Question

XL 2010 Copier des lignes de données de plusieurs feuilles dans une seule

Réponses: 6

Affichages: 852

25 Février 2025

AtTheOne

C

Question

Microsoft 365 Déplacer une ligne sous condition

Réponses: 5

Affichages: 370

9 Avril 2025

CB7

C

Question

Microsoft 365 Effacer (et non supprimer) une ligne suivant texte.

Réponses: 6

Affichages: 426

13 Août 2025

DAVID-44-

Question

XL 2016 Masquer et afficher lignes

Réponses: 3

Affichages: 564

7 Avril 2024

gbinforme

G

Z

Résolu(e)

Microsoft 365 Scinder une ligne en fonction de plusieurs critères

Réponses: 10

Affichages: 560

18 Novembre 2024

Zaadox

Z

N

Question

Microsoft 365 afficher/masquer des lignes en fonction de la valeur d'une cellule qui aura été renseignée par une autre feuille (via un copier/collé automatique)

Réponses: 5

Affichages: 1 K

28 Octobre 2024

Nel'

N

M

Question

XL 2016 Masquer lignes (avec Grouper/Dissocier)

Réponses: 8

Affichages: 880

21 Novembre 2023

midovic

M

A

Résolu(e)

Microsoft 365 Demande d'aide sur des extractions de lignes

Réponses: 7

Affichages: 402

20 Janvier 2025

agayet

A

F

Question

Microsoft 365 Problème RECHERCHEV avec plusieurs correspondances possibles pour une même valeur

2

Réponses: 15

Affichages: 811

16 Avril 2025

floflatch22

F

X

Question

XL 2021 Transformation de données sur une ligne en plusieurs lignes

Réponses: 9

Affichages: 525

1 Avril 2025

xavieralvaro

X

G

Question

Microsoft 365 Macro VBA - mise en forme export excel

Réponses: 6

Affichages: 662

30 Mai 2024

gpera

G

S

Résolu(e)

Microsoft 365 Boucle pour afficher et masquer des lignes

Réponses: 12

Affichages: 902

22 Mai 2024

shf

S

S

Résolu(e)

XL 2016 Boucle For ne s'exécute pas comme une boucle et boucle infinie

Réponses: 2

Affichages: 446

13 Mai 2024

Stéphane_1

S

T

Résolu(e)

XL 2021 Masquer des colonnes et affichage avec MDP

Réponses: 11

Affichages: 1 K

9 Août 2024

ThomAnalyses

T

C

Résolu(e)

Copier/Masquer des lignes de couleur pour alimenter un tableau

Réponses: 9

Affichages: 931

25 Juin 2024

vgendron

A

Résolu(e)

Microsoft 365 VBA_Copier coller selon des critères dans deux menus déroulants

Réponses: 6

Affichages: 383

5 Février 2025

Altfkat

A

Partager ce contenu :

Facebook X Bluesky LinkedIn Reddit Pinterest Tumblr WhatsApp E-mail Copier le lien