Discussion :

[nicolast]

Bonjour,

Je sui en train de créer une macro qui va permettre de masquer ou non des colonnes (sur différentes feuilles) en fonction d'un mot de passe (demandé à l'ouverture du classeur).
Jusque la tout va bien sauf que j'aimerai que quand les colonnes sont cachées, elles le restent. Donc il faudrait pouvoir bloquer le redimensionnement des colonnes et "l'outils" afficher/masquer, et là je bloque.

Pour cacher les colonnes j'ai fait :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Worksheets("nom_feuille").Columns("D:G").Hidden = True

Vous auriez pas une idée s'il vous plaît ?

[aalex_38]

Bonjour,

Il faut aller dans outil/protection/protection de la feuille

[nicolast]

Ah oui tiens je ne connaissais pas cet outils.
En tout cas il est parfait

Merci

[aalex_38]

Je t'en prie, tu peux aussi protéger la feuille par macro.

Un exemple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Sub Protection_feuille()
'
Dim F1 As Worksheet
Set F1 = ActiveSheet
'Protège
    F1.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True, Password:="monpassword"
' Déprotège
    F1.Unprotect Password:="monpassword"
End Sub

Nbour trouver des codes, tu peux utiliser l'enregistreur de macro.