mot de passe enlevé par la sécurité macro

Le
gilles
bonjour à tous,
j'ai un code simplet qui permet d'ouvrir un fichier en laissant l'accès
libre à certains onglets, mais de bloquer l'accès à certains autres.
ça évite de faire FORMAT/protection/feuilles/code
le pb c'est que sur les PC dont le niveau de sécurité est paramètrè élevé ou
moyen , une fenêtre demande si on veut activer les macros , et les
utilisateurs qui mettent NON ont accès à tous les onglets.

Sub protègeFeuilles()
Sheets("CLIENTS").Select
ActiveSheet.Protect "TOTO", True, True, True
Sheets("FOURNISSEURS").Select
End Sub

Y aurait ty un dieu VBAtiste qui verrait une parade ?
merci
gilles
--
en VBA aussi, ne remettons pas au lendemain ce qu'on peut faire aujourd'hui,
mais à chaque jour suffit sa peine
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
LSteph
Le #4393211
Bonjour,
pour être exécuté à l'ouverture
il faut que tu aies appelé ton code
depuis le thisworkbook:

private sub workbook_open()
call protègefeuilles
end sub

Dans le même thisworkbook
déroulant en haut à droite
sélectionne plutôt l'événnement beforesave

Ainsi qd tu vas enregistrer ton classeur les feuilles seront protégées
si l'on active pas les macros à l'ouverture et bien
elles demeureront protégées.

Cordialement.

lSteph

bonjour à tous,
j'ai un code simplet qui permet d'ouvrir un fichier en laissant l'accès
libre à certains onglets, mais de bloquer l'accès à certains autres.
ça évite de faire FORMAT/protection/feuilles/code
le pb c'est que sur les PC dont le niveau de sécurité est paramètrè élevé ou
moyen , une fenêtre demande si on veut activer les macros , et les
utilisateurs qui mettent NON ont accès à tous les onglets.

Sub protègeFeuilles()
Sheets("CLIENTS").Select
ActiveSheet.Protect "TOTO", True, True, True
Sheets("FOURNISSEURS").Select
End Sub

Y aurait ty un dieu VBAtiste qui verrait une parade ?
merci
gilles


gilles
Le #4392801
merci steph
Tu m'as deja dépanné plusieurs fois et je vois que t'as toujours une botte
secrète en réserve
merci encore
--
en VBA aussi, ne remettons pas au lendemain ce qu'on peut faire aujourd'hui,
mais à chaque jour suffit sa peine...



Bonjour,
pour être exécuté à l'ouverture
il faut que tu aies appelé ton code
depuis le thisworkbook:

private sub workbook_open()
call protègefeuilles
end sub

Dans le même thisworkbook
déroulant en haut à droite
sélectionne plutôt l'événnement beforesave

Ainsi qd tu vas enregistrer ton classeur les feuilles seront protégées
si l'on active pas les macros à l'ouverture et bien
elles demeureront protégées.

Cordialement.

lSteph

bonjour à tous,
j'ai un code simplet qui permet d'ouvrir un fichier en laissant l'accès
libre à certains onglets, mais de bloquer l'accès à certains autres.
ça évite de faire FORMAT/protection/feuilles/code
le pb c'est que sur les PC dont le niveau de sécurité est paramètrè élevé ou
moyen , une fenêtre demande si on veut activer les macros , et les
utilisateurs qui mettent NON ont accès à tous les onglets.

Sub protègeFeuilles()
Sheets("CLIENTS").Select
ActiveSheet.Protect "TOTO", True, True, True
Sheets("FOURNISSEURS").Select
End Sub

Y aurait ty un dieu VBAtiste qui verrait une parade ?
merci
gilles





Publicité
Poster une réponse
Anonyme