Macro proteger par mdp

Dull

XLDnaute Barbatruc

• 18 Mars 2008

• #2

Re : Macro proteger par mdp

Re aurel, le Forum

A tu regardé les "discussions similaires" en bas de pages

il y a plein de fils traitant ce sujet

Bonne Journée

 

Vote positif 0 Vote négatif

aurel

XLDnaute Junior

• 18 Mars 2008

• #3

Re : Macro proteger par mdp

Re Dull,

Je les avais plus ou moins lu mais il ne reponde pas a mon attente.

En faite uniquement qql personnes connaiterons le mdp et pourrons se servir de cette macro. ce n'est pas pour empeché les utilisateurs de voir le code!!

 

Vote positif 0 Vote négatif

Staple1600

XLDnaute Barbatruc

• 18 Mars 2008

• #4

Re : Macro proteger par mdp

Bonjour à tous

Voici un petit exemple

Code:

Sub Macro_MDP()
Dim MDP As String
MDP = Chr(97) + Chr(117) + Chr(114) + Chr(101) + Chr(108)
If MDP = _
(InputBox("Saisir le mot de passe", "AUTORISATION D'EXECUTION")) Then
MsgBox "la macro a été lancée"
Else
Exit Sub
End If

Je te laisse deviner le bon mot de passe

 

Dernière édition: 18 Mars 2008

Vote positif 0 Vote négatif

aurel

XLDnaute Junior

• 18 Mars 2008

• #5

Re : Macro proteger par mdp

Merci beaucoup, et pour le mots de passe c ok aussi.

A tres bientot les amis

 

Vote positif 0 Vote négatif