XL 2016 Userform et utilisateurs

Salut le fil,
à mon avis il faut ajouter d'abord une colonne ou tu mets la date de modification du mot de passe
ensuite un userform pour le changement de mot de passe

en deuxième lieu, tu fais un test si avant l'autorisation d’accès pour contrôler si la date du MDP est valide
selon le cas il permet l’accès ou le redirige vers le formulaire de changement de mot de passe.

'Déclaration de variable
Dim mot_de_passe As String
Dim role As String
Dim date_mdp As Date

'Configuration de variable
mot_de_passe = WorksheetFunction.VLookup(TextUser, Sheets("Bdd").Range("c:h"), 2, 0)
role = WorksheetFunction.VLookup(TextUser, Sheets("Bdd").Range("c:h"), 3, 0)
date_mdp = WorksheetFunction.VLookup(TextUser, Sheets("Bdd").Range("c:L"), 10, 0)
'MsgBox mot_de_passe
'MsgBox role
If Now() - date_mdp <= 0 Then MsgBox "tu dois changer le mot de passe"
GoTo xxx
'
'
'





'
Sheets("Menu").Range("M3") = " Bonjour " & " " & WorksheetFunction.VLookup(TextUser, Sheets("Bdd").Range("c:h"), 5, 0)
'Vider le formulaire de connection
TextMDP = ""
TextUser = ""
Unload Me

xxx:
FicheMDP.Show
Exit Sub
End Sub


voila une piste à toi de continuer

Bonjour le forum, Kingfadhel
Je viens de voir votre réponse et vais réfléchir à vos idées n'ayant eu aucune autre proposition.
Je reviendrais vers vous si besoin d'un petit coup de main.
Cordialement,
Philippe.

Bonjour le forum, kingfadhel

Je reviens vers vous car je galère toujours sur mon projet.
J’ai suivi les conseils de kingfadhel pour ce qui est d’un deuxième userform mais ou je bloque à présent c’est pour modifier le mot de passe.

Je parviens bien à le copier dans la bonne feuille mais pas en fonction du nom de l’utilisateur d’où ma nouvelle demande d’aide

Cordialement,
Philippe.