Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

cacher des colonnes en cliquant sur un bouton

cyremia

XLDnaute Nouveau
Bonjour,

je dois réaliser un tableau répertoriant les actions menés par deux sociétés.
je souhaiterais mettre en place un bouton ou une case à cocher qui permettrait de cacher les colonnes correspondant à une de ces deux entreprises.

j'ai chercher sur différents forum mais je n'ai rien trouver qui pourrait m'aider.
ps : je n'ai aucune connaissance en macro


Merci pour votre aide.
 

Pièces jointes

  • action 51 gms secometal.xlsm
    33.7 KB · Affichages: 32

Lone-wolf

XLDnaute Barbatruc
Bonjour cyremia et bienvenue sur XLD

Il faut modifier Columns("12:613").EntireColumn.Hidden par le nom des colonnes que tu veux masquer. Mais comme le dit kris, comment savoir à qui appartient la ou les colonnes??

Et il y a cette ligne que je ne comprends pas
If Range("e4").Value = "WEE-END" Then. Où est inscrit WEE-END???
Si c'est la date, c'est g3 et non e4.

Si c'est un week-end
If Weekday(Range("g3").Value) = vbSaturday Or Weekday(Range("g3").Value) = vbSunday Then
Rows("12:315").EntireRow.Hidden = True
Else
Rows("12:315").EntireRow.Hidden = False
End If

Et Private Sub Worksheet_Change(ByVal Target As Range) est à mettre dans le module de la feuille et non dans un module standart.


EDIT: bonjour kris, on c'est croisés.
 
Dernière édition:

Lone-wolf

XLDnaute Barbatruc
Bonsoir à tous

@cyremia : Ton fichier en retour. J'ai inscrit les noms dans les colonnes et ajouté une liste déroulante(cellule jaune) pour afficher ou masquer les sociétés. Le bouton sert à masquer les lignes, double-clique sur la feuille pour tout afficher. J'éspère que ça conviendra.
 

Pièces jointes

  • action 51 gms secometal.xlsm
    44.1 KB · Affichages: 33
Dernière édition:

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…