Masquer/Démasquer une ligne suivant le résultat d'une cellule de [Résolu/Fermé]
Signaler
bruillois
eriiic
- Messages postés
- 12
- Date d'inscription
- mardi 14 décembre 2004
- Statut
- Membre
- Dernière intervention
- 17 juin 2014
eriiic
- Messages postés
- 23809
- Date d'inscription
- mardi 11 septembre 2007
- Statut
- Contributeur
- Dernière intervention
- 21 janvier 2021
A voir également:
- Masquer/Démasquer une ligne suivant le résultat d'une cellule de
- Masquer/Démasquer une ligne suivant le résultat d'une cellule de ✓ - Forum - Excel
- Masquer des lignes suivant le contenu d'une cellule ✓ - Forum - VB / VBA
- Une ligne avec le résultat d'une cellule ? Office Calc / Excel ✓ - Forum - LibreOffice / OpenOffice
- MACRO : masquer lignes suivant triple condition ✓ - Forum - Excel
- Masquer automatiquement des colonnes et des lignes suivant une valeur ✓ - Forum - Excel
6 réponses
Mike-31
- Messages postés
- 17301
- Date d'inscription
- dimanche 17 février 2008
- Statut
- Contributeur
- Dernière intervention
- 20 janvier 2021
Bonsoir,
regarde si dans cette discussion si cele peut te mettre sur la voie
https://forums.commentcamarche.net/forum/affich-30245442-excel-masquer-certaines-lignes-en-fonction-d-une-cellule
regarde si dans cette discussion si cele peut te mettre sur la voie
https://forums.commentcamarche.net/forum/affich-30245442-excel-masquer-certaines-lignes-en-fonction-d-une-cellule
bruillois
- Messages postés
- 12
- Date d'inscription
- mardi 14 décembre 2004
- Statut
- Membre
- Dernière intervention
- 17 juin 2014
Merci pour ta réactivité, mais j'ai essayé de l'adapter, mais je n'y arrive pas.
dans mon cas , la valeur 1 ou 0, est affectée à la fin de chaque ligne.
et cette valeur est donnée automatiquement en fonction de l'auteur. 1 si c'est l'auteur sélectionné dans le menu déroulant et 0 si ce n'est pas lui, d'où le besoin de masquer les lignes avec un 0 dans la colonne "Afficher"
dans mon cas , la valeur 1 ou 0, est affectée à la fin de chaque ligne.
et cette valeur est donnée automatiquement en fonction de l'auteur. 1 si c'est l'auteur sélectionné dans le menu déroulant et 0 si ce n'est pas lui, d'où le besoin de masquer les lignes avec un 0 dans la colonne "Afficher"
Mike-31
- Messages postés
- 17301
- Date d'inscription
- dimanche 17 février 2008
- Statut
- Contributeur
- Dernière intervention
- 20 janvier 2021
Re,
peux tu mettre un bout de ton fichier anonymisé avec quelques explications sur ce que tu veux faire.
pour joindre ton fichier sert toi de ce lien
https://www.cjoint.com/
peux tu mettre un bout de ton fichier anonymisé avec quelques explications sur ce que tu veux faire.
pour joindre ton fichier sert toi de ce lien
https://www.cjoint.com/
eriiic
- Messages postés
- 23809
- Date d'inscription
- mardi 11 septembre 2007
- Statut
- Contributeur
- Dernière intervention
- 21 janvier 2021
Bonjour,
Tu peux mettre un filtre automatique qui te permettra de filtrer sur les 1
eric
Tu peux mettre un filtre automatique qui te permettra de filtrer sur les 1
eric
bruillois
- Messages postés
- 12
- Date d'inscription
- mardi 14 décembre 2004
- Statut
- Membre
- Dernière intervention
- 17 juin 2014
voici le lien
https://www.cjoint.com/?DFrjLwfk08B
j'ai essayé ce code mais sans succès
Sub masquer()
i = 3 'la macro commence à la ligne 2, si la première ligne est 3, mets : i=3
Do While Cells(i, 4).HasFormula = True 'tant que le cellule de la ligne i et colonne 1 contient une formule
If Cells(i, 4) = "" Then 'si la valeur de la cellule de ligne i et de la colonne 1 = "" alors
Rows(i).EntireRow.Hidden = True 'on cache la ligne
Else ' sinon
Rows(i).EntireRow.Hidden = False 'on affiche la ligne
End If
i = i + 1 'on passe à la ligne suivante
Loop
End Sub
https://www.cjoint.com/?DFrjLwfk08B
j'ai essayé ce code mais sans succès
Sub masquer()
i = 3 'la macro commence à la ligne 2, si la première ligne est 3, mets : i=3
Do While Cells(i, 4).HasFormula = True 'tant que le cellule de la ligne i et colonne 1 contient une formule
If Cells(i, 4) = "" Then 'si la valeur de la cellule de ligne i et de la colonne 1 = "" alors
Rows(i).EntireRow.Hidden = True 'on cache la ligne
Else ' sinon
Rows(i).EntireRow.Hidden = False 'on affiche la ligne
End If
i = i + 1 'on passe à la ligne suivante
Loop
End Sub
bruillois
- Messages postés
- 12
- Date d'inscription
- mardi 14 décembre 2004
- Statut
- Membre
- Dernière intervention
- 17 juin 2014
Concernant les explications, je souhaite masquer les lignes 0 au lieu de surligner les lignes 1