[Résolu] Selectionner l'affichage d'une ou plusieurs colonnes

[fungio]

Bonjour à tous !

J'ai le tableau suivant :


Ce tableau contient des centres de charges (1ère colonne) et apres chaque colonne correspond à une semaine de l'année (semaine 1, 2, 3...)

J'aimerais avoir un moyen (un genre de select ? macro ?) me permetant de n'afficher que des semaines choisies par l'utilisateur. Par exemple si je ne veux que les semaines 1, 3 et 7 et bah je selectionne ces 3 semaines et seulement les trois colonnes n'apparaissent. Savez vous comment proceder ? Si oui, estce possible de trier aussi par centre de charge ? par exemple n'afficher que les centres de charges Tour et Fraiseuse pour les semaines 4 et 8.


J'ai cherché du coté des Tableau croisé dynamiques. Avec ces derniers j'arrive a trier par centre de charge mais les semaines restent sur des colonnes distinctes...
Merci beaucoup 🙂

 

[Guest]

Re : Selectionner l'affichage d'une ou plusieurs colonnes

Bonjour,

Pas facile de travailler sur une image.

A+

 

[fungio]

Re : Selectionner l'affichage d'une ou plusieurs colonnes

Je pensais pas que le fichier serait utile étant donné qu'il sagit d'un bete tableau.

Regarde la pièce jointe test.xlsx

 

[Guest]

Re : Selectionner l'affichage d'une ou plusieurs colonnes

ben patiente ça viendra sûrement....

 

[fungio]

Re : Selectionner l'affichage d'une ou plusieurs colonnes

C'est bon j'ai ajouté le fichier dans mon poste précédent

 

[Staple1600]

Re : Selectionner l'affichage d'une ou plusieurs colonnes

Bonsoir à tous


Essaie cette macro (j'ai testé cela fonctionne)

Sub CachezCesColonnes()
Dim p As Range, v As Range
Set p = [B1:BA1]
p.Columns.Hidden = True
Set v = Intersect(Selection, p)
v.Columns.Hidden = False
End Sub

PS: Bonjour Hasco 😉


EDITION: Pour le plaisir

Sub CachezCesColonnes_Light()
[B1:BA1].Columns.Hidden = True: Intersect(Selection, [B1:BA1]).Columns.Hidden = False
End Sub

 

[fungio]

Re : Selectionner l'affichage d'une ou plusieurs colonnes

Merci de ta réponse.
J'ai une erreure a la ligne 6 : v.Columns.Hidden = False
Erreur d'exécution '91':

Variable objet ou variable de bloc With non définie

 

[Staple1600]

Re : Selectionner l'affichage d'une ou plusieurs colonnes

bonsoir

comme dit plus bas

Essaie cette macro (j'ai testé cela fonctionne)

j'ai testé sur ton fichier joint.

 

[DoubleZero]

Re : Selectionner l'affichage d'une ou plusieurs colonnes

Bonjour, fungio, Hasco 🙂, Staple1600 🙂, le Forum,

n'afficher que des semaines choisies par l'utilisateur. Par exemple si je ne veux que les semaines 1, 3 et 7 et bah je selectionne ces 3 semaines et seulement les trois colonnes n'apparaissent.

Le ridicule ne tuant pas 🙄 j’ose proposer le fichier ci-dessous.

Nota : Les macros du post #6 fonctionnent parfaitement chez moi.

A bientôt.

 

[Staple1600]

Re : Selectionner l'affichage d'une ou plusieurs colonnes

Bonsoir 00

Nota: Les macros du post#9 fonctionnent très bien chez moi 😉 (et sont tout sauf ridicules)

 

[Guest]

Re : Selectionner l'affichage d'une ou plusieurs colonnes

Re,

Je confirme, et je trouve ça plutôt sympa comme solution.

A+

 

[DoubleZero]

Re : Selectionner l'affichage d'une ou plusieurs colonnes

Re-bonjour,

Merci, Staple1600 🙂, merci, Hasco 🙂 !

Si je progresse, c'est, notamment, grâce à vous 😱.

A bientôt 🙂🙂

 

[fungio]

Re : Selectionner l'affichage d'une ou plusieurs colonnes

Merci beaucoup j'ai pu adapter le code 😉