Faire disparaitre une colonne selon un choix dans une cellule

Gorfael

XLDnaute Barbatruc

• 5 Juin 2011

• #2

Re : Faire disparaitre une colonne selon un choix dans une cellule

Salut dipsiemarin et le forum
Un exemple en pièce jointe, par macro Change.
A+

 

Pièces jointes

• TEST B mod.xls

  33.5 KB · Affichages: 108

Vote positif 0 Vote négatif

ERIC S

XLDnaute Barbatruc

• 5 Juin 2011

• #3

Re : Faire disparaitre une colonne selon un choix dans une cellule

Re

à essayer

edit : Bonjour Gorfael

 

Pièces jointes

• TEST B (1).xls

  35 KB · Affichages: 98

Vote positif 0 Vote négatif

D

dipsiemarin

XLDnaute Occasionnel

• 5 Juin 2011

• #4

Re : Faire disparaitre une colonne selon un choix dans une cellule

Bonjour Gorfael,

c'est exactement ce que je voulais mais par contre je pourrais connaitre les étapes pour réaliser cette operation

merci par avance

 

Vote positif 0 Vote négatif

D

dipsiemarin

XLDnaute Occasionnel

• 5 Juin 2011

• #5

Re : Faire disparaitre une colonne selon un choix dans une cellule

merci Eric S

le fichier fonctionne aussi mais pour ne pas mourir bete serait il possible de connaitre les étapes pour réaliser cette operation

merci

 

Vote positif 0 Vote négatif

ERIC S

XLDnaute Barbatruc

• 5 Juin 2011

• #6

Re : Faire disparaitre une colonne selon un choix dans une cellule

Re

dans ta cellule B4, sous XL 2003 : Données validation, liste .. et tu écris tes choix possibles

pour la macro, penser à utiliser l'enregistreur de macro, que l'on peut souvent simplifier après

fais des essais du style :

outils macros nouvelle macro. tu sélectionnes tes colonnes et tu fais masquer ou afficher
tu arrêtes ta macro et tu va voir le code

 

Vote positif 0 Vote négatif

D

dipsiemarin

XLDnaute Occasionnel

• 5 Juin 2011

• #7

Re : Faire disparaitre une colonne selon un choix dans une cellule

Re,

j'ai compris pour la liste mais par contre la macro je largue un peu j'ai excel 2007

 

Vote positif 0 Vote négatif

Gorfael

XLDnaute Barbatruc

• 5 Juin 2011

• #8

Re : Faire disparaitre une colonne selon un choix dans une cellule

Salut dipsiemarin et le forum
Pour B4, Eric S ta fourni l'explication
Clic-droit sur le nom de l'onglet>>Menu contextuel>>Visualiser le code

Code:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address(0, 0) = "B4" Then
    Columns.Hidden = False
    Select Case UCase(Target)
        Case "GAZ"
            Columns(4).Hidden = True
        Case "FOD"
            Columns(3).Hidden = True
    End Select
End If
End Sub

Worksheet_Change se lance chaque fois qu'une cellule sort du mode édition => target contient les cellule concernées et est mise à jour par Excel
If Target.Address(0, 0) = "B4" Then => si l'adresse de la cible en relatif/relatif est B4, alors
Columns.Hidden = False => afficher toutes les colonnes
UCase(Target) => la valeur de target en majuscules
Columns(4).Hidden = True => masquer la colonne D (D=4)
A+

 

Vote positif 0 Vote négatif

D

dipsiemarin

XLDnaute Occasionnel

• 5 Juin 2011

• #9

Re : Faire disparaitre une colonne selon un choix dans une cellule

OK merci j'ai compris effectivement

merci GORFAEL et ERIC S
bonne soiree

 

Vote positif 0 Vote négatif