macro protection

J

JIMIX

Guest
Salut tout le monde,

existe t-il une macros qui permette de faire une protection automatique, sur simple clic sur un bouton par exemple.

si oui merci de m'expliquer les démarches à entreprendre.

Merci par avance pour vos réponses. B)
 

N_Christian

XLDnaute Occasionnel
Re: désolé entre temps tu as changer ta demande.. je te le passe Q^m..

pour le fichier complet tu as une protection à l'ouverture:

Sub Protection()
'
'WriteResPassword Argument de type Variant facultatif. Chaîne qui indique le mot de passe de protection en écriture du fichier.
'Si un fichier est enregistré avec le mot de passe et
'que ce mot de passe n'est pas tapé à l'ouverture du fichier,
'le fichier s'ouvre en lecture seule.
ActiveWorkbook.SaveAs FileName:='D:\\Moi.xls', WriteResPassword:='Moi'
End Sub

pour le feuille c'est la commande protect et unprotect..

ActiveSheet.Unprotect 'Moi'

ActiveSheet.Protect Password:='Moi'


tu devrais réussir à verrouiller ta feuille.. penses au format des cellules.

A+ Christian
 

N_Christian

XLDnaute Occasionnel
Bonjour le fil, Jimix,

3 solutions:
1) Ton bouton est celui que tu pêches dans la barre d'outils < command > dans ce cas tu vas dans VB et dans la feuille qui contien ton bouton tu sélectionnes bouton_click. et tu inscris ta macro...

2) Tu as une image dans ta feuille. dans VB tu crées un module, tu copies ta macro ( avec un nom... ' Protection ' dans mon exemple.
ensuite dans Excel, clic droit sur ton image, Affecter une macro.. tu sélectionnes ton nom de macro..

3) une variante.. dans le VB tu crées un événement affecté à la feuille ou au classeur.. ( un clic souris ou avant de fermer ou sur changement de sélection. ( mais il n'y a plus de bouton... c'est un événement )


Si cela te rebute,.. dis moi ce que tu souhaites exactement.. je te passe un fichier.. ya pas de probléme

Dans l'attente
A+ Christian


je mets un fichier avec une macro pour une feuille...
A+ Christian [file name=Verrouillage.zip size=8540]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Verrouillage.zip[/file]

Message édité par: N_Christian, à: 20/09/2005 09:00
 

Pièces jointes

  • Verrouillage.zip
    8.3 KB · Affichages: 48
  • Verrouillage.zip
    8.3 KB · Affichages: 50
  • Verrouillage.zip
    8.3 KB · Affichages: 48
J

jimix

Guest
encore merci pour toutes ces explications.

par contre, c le code qui ne me convient pas trop. En fait, il me faudrait un code qui me permette de protéger la feuille.

comme si on faisait outil, protection, protéger la feuille.

je l'ai fait en faisant un enregistrement de macro, la protection fonctionne par contre il ne me demande pas de mot de passe pour lever le protection il le fait seul.

je te joins un fichier excel qui te permettra de comprendre.
 

N_Christian

XLDnaute Occasionnel
Re:Jimix

pour te répondre.. tu peux demander un mot de passe:


PassWord = inputbox ' Entrez le mot de passe'
if PassWord = 'Moi' then ActiveSheet.Unprotect 'Moi'


Pour ton fichier joint.... tu as oublié ou il n'est pas conforme... un zip 'toto.zip' taille <50K... ya un tutorial en entête du forum pour poster un fichier..

A+ Christian
 

N_Christian

XLDnaute Occasionnel
Re:

Je te passe le fichierd de tout à l'heure avec une boite de sasie..

A+ et Bon ap.. Christian [file name=Verrouillage_20050920120800.zip size=9780]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Verrouillage_20050920120800.zip[/file]
 

Pièces jointes

  • Verrouillage_20050920120800.zip
    9.6 KB · Affichages: 44

Discussions similaires

Réponses
16
Affichages
724
Réponses
9
Affichages
233

Statistiques des forums

Discussions
312 816
Messages
2 092 361
Membres
105 378
dernier inscrit
y07