macro protection

[JIMIX]

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]

Bonjour JIMIX,

tu veux p^rotéger quoi..? dans ce bouton..
on peut verrouiller une feuille..
on peut protéger un classeur... ect..

Merci de me donner des détails
A+ Christian

 

[jimix]

pour protéger le fichier entièremment.

 

[jimix]

plutôt la feuille....

 

[N_Christian]

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

 

[jimix]

merci pour ta réponse.

j'essaie de le faire

 

[JIMIX]

Je n'y arrive pas. Comment fait-on, pour associer ce code à un bouton?

 

[N_Christian]

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

 

[jimix]

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]

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]

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]

 

[jimix]

c exactement ce que je cherchcais à faire.

un grand merci. j'éspère que je vais réussir à l'utiliser sans pb.

encore merci

 

[N_Christian]

Bonsoir à tous,

Ya pas de probléme, c'est toujours avec plaisir.. bon courage pour la suite de ton appli..
Inscris toi...! pour le 3000éme c'est loupé mais ce serait un vrai plaisir de te retrouver sur d'autre post.... tiens moi au courant..

A+ Christian