Masquer une colonne selon une date [Résolu]

Messages postés
5
Date d'inscription
vendredi 11 janvier 2019
Statut
Membre
Dernière intervention
11 janvier 2019
- - Dernière réponse : CharlesJ.
Messages postés
5
Date d'inscription
vendredi 11 janvier 2019
Statut
Membre
Dernière intervention
11 janvier 2019
- 11 janv. 2019 à 15:44
Bonjour,

J'essaye de mettre en place un système qui me permettrai de masquer une colonne quand la valeur d'une cellule ne correspond a la valeur d'une cellule de la colonne.

Je m'explique:

J'ai les cellules d'une ligne qui font référence au nombre de semaine dans l'année. (B3= 1; C3 = 2 ; D3 = 3...).
Dans une autre cellule à part, j'ai mis une liste déroulante pour sélectionner: Semaine : 1, 2, 3 ... ( le chiffre est en K2)

Comment faire pour que lorsque je suis en Semaine 2, il n'y ai que la colonne C qui apparaisse étant donnée qu'en C3 il y à 2. Et que les autres cellules soit masquer.

Merci de votre aide.
Cordialement,
CharlesJ.
Afficher la suite 

1 réponse

Meilleure réponse
Messages postés
544
Date d'inscription
lundi 22 septembre 2008
Statut
Membre
Dernière intervention
30 septembre 2019
70
1
Merci
Bonjour,

A voir avec l'exemple.
https://mon-partage.fr/f/kMNmzZYH/

par contre, je n'ai pas mis la liste déroulante en K2 mais en A2, sinon lors du masquage, elle sera masquée.

Dire « Merci » 1

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

CCM 63494 internautes nous ont dit merci ce mois-ci

M-12
Messages postés
544
Date d'inscription
lundi 22 septembre 2008
Statut
Membre
Dernière intervention
30 septembre 2019
70 -
Re,

La macro avec la liste déroulante en A2
Private Sub Worksheet_Change(ByVal Target As Range)
Dim i%
If Not Application.Intersect(Target, Range("A2")) Is Nothing Then
  Range("A:BC").EntireColumn.Hidden = False
  For i = Cells(3, Columns.Count).End(xlToLeft).Column To 2 Step -1
        If Cells(3, i).Value <> Cells(2, 1) Then Columns(i).Hidden = True
    Next i
End If
End Sub
 


A mettre dans la feuille, pas dans un module
CharlesJ.
Messages postés
5
Date d'inscription
vendredi 11 janvier 2019
Statut
Membre
Dernière intervention
11 janvier 2019
-
Désole de vous poser autant de question, je ne suis pas a l'aise avec les macros mais je me forme !

J'ai bien collé la macro mais elle ne s'applique pas ou je n'arrive pas a la faire s'appliquer. Pouvez-vous m'aider ?
CharlesJ.
Messages postés
5
Date d'inscription
vendredi 11 janvier 2019
Statut
Membre
Dernière intervention
11 janvier 2019
-
Du coup ça a fonctionné cependant lorsque je modifie les données dans la liste déroulantes cela me masque toute les colonnes même celles que je ne souhaite pas. C'est a dire quand je mets 2, je souhaite que la colonne C reste affiché car dans la cellule 3 il y a le chiffre 2.
M-12
Messages postés
544
Date d'inscription
lundi 22 septembre 2008
Statut
Membre
Dernière intervention
30 septembre 2019
70 -
Re,

Teste avec mon classeur d'origine, cela fonctionne comme tu le veux
https://www.cjoint.com/c/IAlkT5r4HKU
CharlesJ.
Messages postés
5
Date d'inscription
vendredi 11 janvier 2019
Statut
Membre
Dernière intervention
11 janvier 2019
-
Super merci beaucoup de votre aide.

Cordialement,
CharlesJ.
Commenter la réponse de M-12