OVH Cloud OVH Cloud

mot de passe

3 réponses
Avatar
GIBI68
Bonjour à tous,
Je voudrais si c'est possible mettre un mot de passe dans une procédure
derrière un bouton_click.
Est-ce possible ?
L'aide d'Excel ne m'est pas d'un grand secours.
Merci

3 réponses

Avatar
anomymousA
bonjour,

explicite plus ce que tu souhaites. Sur click ,où ?


un exemple à partir de la valeur d'un textbox sur un UF.Ici une table de mdp
possibles puis un controle de la valeur du textbox par rapport à la table.
Mais il y a bien d'autres manières de procéder.

On Error Resume Next

tabmdp = Array("toto", "tata", "titi", "tutu", "tete", "tyty", "zzz")

trouve = Application.WorksheetFunction.HLookup(TextBox2.Value, tabmdp, 1,
False)

If Err.Number <> 0 Then
Err.Clear
MsgBox "pas le bon mdp"
Else
MsgBox "bon mot de passe"
controlmdp = True
End If

A+


Bonjour à tous,
Je voudrais si c'est possible mettre un mot de passe dans une procédure
derrière un bouton_click.
Est-ce possible ?
L'aide d'Excel ne m'est pas d'un grand secours.
Merci





Avatar
GIBI68
Bonsoir,
Quand on click sur un bouton une procédure se déroule qui enregistre des
valeurs dans des cellules. Pour éviter que n'importe qui modifie ces valeurs
je voulais mettre un mot de passe dés que l'on click sur le bouton.
Un mot de passe dont la valeur est rentrée dans le code pour faire plus
simple (pas modifiable).
Merci


"anomymousA" a écrit dans le message
de news:
bonjour,

explicite plus ce que tu souhaites. Sur click ,où ?


un exemple à partir de la valeur d'un textbox sur un UF.Ici une table de
mdp

possibles puis un controle de la valeur du textbox par rapport à la table.
Mais il y a bien d'autres manières de procéder.

On Error Resume Next

tabmdp = Array("toto", "tata", "titi", "tutu", "tete", "tyty", "zzz")

trouve = Application.WorksheetFunction.HLookup(TextBox2.Value, tabmdp, 1,
False)

If Err.Number <> 0 Then
Err.Clear
MsgBox "pas le bon mdp"
Else
MsgBox "bon mot de passe"
controlmdp = True
End If

A+


Bonjour à tous,
Je voudrais si c'est possible mettre un mot de passe dans une procédure
derrière un bouton_click.
Est-ce possible ?
L'aide d'Excel ne m'est pas d'un grand secours.
Merci







Avatar
anonymousA
re,

adaptes le code que je t'ai communiqué à commandbutton_click. Ce sera
suffisant

A+

Bonsoir,
Quand on click sur un bouton une procédure se déroule qui enregistre des
valeurs dans des cellules. Pour éviter que n'importe qui modifie ces valeurs
je voulais mettre un mot de passe dés que l'on click sur le bouton.
Un mot de passe dont la valeur est rentrée dans le code pour faire plus
simple (pas modifiable).
Merci


"anomymousA" a écrit dans le message
de news:

bonjour,

explicite plus ce que tu souhaites. Sur click ,où ?


un exemple à partir de la valeur d'un textbox sur un UF.Ici une table de


mdp

possibles puis un controle de la valeur du textbox par rapport à la table.
Mais il y a bien d'autres manières de procéder.

On Error Resume Next

tabmdp = Array("toto", "tata", "titi", "tutu", "tete", "tyty", "zzz")

trouve = Application.WorksheetFunction.HLookup(TextBox2.Value, tabmdp, 1,
False)

If Err.Number <> 0 Then
Err.Clear
MsgBox "pas le bon mdp"
Else
MsgBox "bon mot de passe"
controlmdp = True
End If

A+



Bonjour à tous,
Je voudrais si c'est possible mettre un mot de passe dans une procédure
derrière un bouton_click.
Est-ce possible ?
L'aide d'Excel ne m'est pas d'un grand secours.
Merci