Microsoft 365 Afficher ou Masquer Colonne

[eric72]

Bonjour,
J'aimerais savoir s'il est possible de masquer ou d'afficher les colonnes selon le remplissage Exemple de :M4 qui contient une formule liée à la liste déroulante
Si résultat de M4 est "" alors masquer la colonne, si <>"" alors l'afficher.
Malgré mes recherches je ne trouve pas de réponse.
Merci à tous pour votre dévouement.
Eric

 

[sousou]

Bonsoir
Tu ne nous dit pas dans quelle feuille cela se passe!
mais essai ceci code dans la feuille
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$M$4" Then
If Target = "" Then
Columns(13).Hidden = True
Else
Columns(13).Hidden = False
End Sub

 

[eric72]

Oups désolé,

alors la feuille c'est "échéancier", j'ai mis m4 pour exemple mais il faudrait que cela fonctionne pour toutes les colonnes et il y en a beaucoup (environ 700) potentiellement.

 

[sousou]

il faut controler tes colonnes essai comme ceci
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Row = 4 And Target.Column > 5 And Target.Column < 700 Then
Columns(Target.Column).Hidden = True

End If
Else
Columns(Target.Column).Hidden = False
End If
End Sub

 

[eric72]

Ca ne fonctionne pas quand je change la date dans ma liste déroulante mais uniquement quand je modifie une cellule autre de plus il m'indique une "erreur de compilation", "else sans if"!!!

 

[sousou]

Effectivement c'est pas good
Veux -tu que toutes les colonnes ou la ligne 4 est vide soient masquée?

 

[eric72]

Oui c'est ce que j'aimerais

 

[sousou]

tu parles bien de 700colonnes?

 

[eric72]

oui

 

[eric72]

meme s'il n'y aura pas 700 colonnes à masquer mais seulement certaines

 

[sousou]

Regarde ceci
Il faut affecter chaque listbox à la macro changement
j'ai mis 150 colonnes à toi de modifier.
A voir si ca peux convenir

 

[eric72]

Bonjour,
Merci beaucoup cela fonctionne à merveille!!!
Si j'osais je te demanderais bien comment masquer des colonnes par exemple si nous sommes le 1er mars 2020, masquer le mois de janvier, si nous sommes le 1er avril masquer février etc...

 

[sousou]

Questions! (on est le 1 avril)
1/tu veux que tous les colonnes avant mars soient masquer c'est à dire janvier et février ou seul février.
2/ est-ce que tu veux masquer la colonnes comportant le nom du mois : ex (colonne d, o....)
Ci joint un essai avec la macro masque mois, à voir comment tu veux l'utiliser

 

[eric72]

l'idéal serait qu'au 1er mars 2021 toutes les colonnes de janvier 2020 à janvier 2021 soient masquées, puis au 1er avril toutes soient masquées de janvier 2020 à février 2021, qu'il ne reste que le mois -1 d'affiché.
J'espère être assez clair!!!
Merci beaucoup pour ton aide.
Eric

 

[sousou]

La difficulté, est que la notion d'année n'existe pas réellement dans tes données (ligne 6)
tu notes janvier février..... janvier, février,
Il faudrait que tu remplaces le mois par une date au format mois 1/1/2019,1/2/2019.....
dans ce cas la macro fournit dans le fichier fonctionnerai en modifiant quelques trucs.
Mais je ne sais pas si ca peut perturber le reste de tes formule?