Masquer colonne à la fermeture du fichier

[kikinette]

Bonjour,

Je travaille sur un fichier dans lequel j'ai inséré une colonne A dont l'affichage est protégé par un mot de passe (donné à un nombre restreint d'utilisateurs).

Je souhaiterais que cette colonne se masque automatiquement à chaque fermeture du fichier

J'ai essayé le code suivant dans This Workbook :

Private Sub Worbook_beforeclose()
Columns ("A:A").Select
Selection.EntireColumn.Hidden = True
End Sub

Mais il ne fonctionne pas,


Pourriez-vous m'aider s'il vous plait ?

Par avance merci!

 

[Pierrot93]

Re : Masquer colonne à la fermeture du fichier

Bonjour,

essaye peut être ainsi :

Option Explicit
Private Sub Worbook_beforeclose()
Sheets("Feuil1").Columns(1).Hidden = True
End Sub

bon après midi
@+