B bbopascal XLDnaute Nouveau 26 Juillet 2023 #1 Bonjour je n'arrive pas a trouver pourquoi j'ai une erreur 13 je lance mon userform LoginForm je saisie mon ID puis mon Mdp et erreur 13 à la validation voici mon fichier si quelqu'un a les yeux plus affuté que moi j’en peu plus de chercher Merci Pièces jointes gestionnaire de mot de passe.xlsm 30.3 KB · Affichages: 3
Bonjour je n'arrive pas a trouver pourquoi j'ai une erreur 13 je lance mon userform LoginForm je saisie mon ID puis mon Mdp et erreur 13 à la validation voici mon fichier si quelqu'un a les yeux plus affuté que moi j’en peu plus de chercher Merci
Phil69970 XLDnaute Barbatruc 26 Juillet 2023 #2 Bonjour @bbopascal et bienvenu sur XLD Ton problème vient d'ici .Range("B5,B6").ClearContents 'efface B5:B6 feuille Admin UserRow = .Range("B8").Value 'userRow Cliquez pour agrandir... En clair tu vides B5 et B6 et après tu cherches la valeur de B8 qui est une formule de la ligne que tu viens de vider !!!! A remplacer par : UserRow = .Range("B8").Value 'userRow .Range("B5,B6").ClearContents 'efface B5:B6 feuille Admin Cliquez pour agrandir... Merci de ton retour Vote positif 0 Vote négatif
Bonjour @bbopascal et bienvenu sur XLD Ton problème vient d'ici .Range("B5,B6").ClearContents 'efface B5:B6 feuille Admin UserRow = .Range("B8").Value 'userRow Cliquez pour agrandir... En clair tu vides B5 et B6 et après tu cherches la valeur de B8 qui est une formule de la ligne que tu viens de vider !!!! A remplacer par : UserRow = .Range("B8").Value 'userRow .Range("B5,B6").ClearContents 'efface B5:B6 feuille Admin Cliquez pour agrandir... Merci de ton retour
B bbopascal XLDnaute Nouveau 27 Juillet 2023 #3 Bonjour Merci beaucoup... Vote positif 0 Vote négatif