XL 2019 Grouper des colonnes + mot de passe pour dégrouper

Tioneb_h

XLDnaute Nouveau
Bonjour,

Quelqu'un peut m'aider pour :

1) vba pour grouper des colonnes automatiquement à la fermeture du fichier
2) mot de passe pour dégrouper les colonnes qui on été fermées automatiquement à la fermeture du fichier

Merci pour votre aide :)

Ben
 

Staple1600

XLDnaute Barbatruc
Bonsoir

Un exemple simple pour te mettre sur la piste.
(VBA à mettre dans le code de la feuille concernée, et pas dans un module standard)
NB: Dans cet exemple, j'ai groupé manuellement les colonnes F:M au préalable.
VB:
Private Sub Worksheet_Activate()
M_d_p = InputBox("Mot de passe?")
If M_d_p = "Staple" Then
Me.Outline.ShowLevels RowLevels:=0, ColumnLevels:=2
Else
Exit Sub
End If
End Sub

Private Sub Worksheet_Deactivate()
Me.Outline.ShowLevels RowLevels:=0, ColumnLevels:=1
End Sub
 

Membres actuellement en ligne

Statistiques des forums

Discussions
299 832
Messages
1 979 414
Membres
206 721
dernier inscrit
Sud catering