Afficher colonnes sur demande

[Lipadec]

Bonjour le Forum, et bonne fin de semaine

Dans une feuille de classeur où il y a plusieurs colonnes qui se répètent selon l'année, y-a-t-il une méthode pour n'afficher que les colonnes qui se ressemblent.
Ci-joint le modèle de la feuille sur laquelle je travaille.

Merci d'avance

Lipadec

 

[suistrop]

Re : Afficher colonnes sur demande

Hello

je t ai rajouter une colonne pour mettre les donnée que tu cherches
c est Tri :
tu met la caétorie et en dessous le numéro appuie sur go et ca selectionne juste ce que t as demander

appuie sur all et ca affiche tout

voici les 2 ptits codes

Sub cartman()
'pour pas voir ce que fais excel
Application.ScreenUpdating = False

cat = Cells(2, 1)
num = Cells(3, 1)

For i = 3 To Range("C2").End(xlToRight).Column
Columns(i).Hidden = False
    If Cells(2, i) <> cat Or Cells(3, i) <> num Then
        Columns(i).Hidden = True
    End If
Next i
'pour pas voir ce que fais excel
Application.ScreenUpdating = True
End Sub

Sub satan()
'pour pas voir ce que fais excel
Application.ScreenUpdating = False

'pour tout afficher
For i = 3 To Range("C2").End(xlToRight).Column
    Columns(i).Hidden = False
Next i

'pour pas voir ce que fais excel
Application.ScreenUpdating = True
End Sub

 

[CBernardT]

Re : Afficher colonnes sur demande

Bonsoir Lipadec et suistrop,

Un essai d'affichage d'un type de colonne comme je l'ai compris ?

Cordialement

Bernard

 

[Lipadec]

Re : Afficher colonnes sur demande

Bonjour tout le monde

Merci à "suistrop" et à "CBernadt", vos deux réponses sont bonnes. Mais je touve que celle de CBernardt est plus praticable pour moi.
Merci une autre fois à tout le monde, et vive le forum

Lipadec

 

[suistrop]

Re : Afficher colonnes sur demande

Bonsoir Lipadec et suistrop,

Un essai d'affichage d'un type de colonne comme je l'ai compris ?

Cordialement

Bernard

en effet tres beau travail , ce que j ai fais a coté c est primitif !😀