XL 2010 Format d'un mot de passe

[scrib]

Bonjour à tout le forum,
Je viens vers vous car je fais un programme de gestion des consommables, avec accès par mot de passe. J'ai un bouton qui réinitialise les mots de passe par le code 123456. Le mot de passe est défini en STRING (j'ai essayer VARIANT avec le même résultat. Ce MDP est placé dans une cellule d'une feuille cachée. Lorsque je veux me connecter avec le mot de passe qui qui ne contient que des chiffres cela ne fonctionne pas. Si il commence ou finit par des chiffres et inclus des lettres ça fonctionne. Pouvez-vous m'expliquer l'erreur que je fais. Je ne peux mettre le fichier en pièce jointe pour des raisons de sécurité.
Bonne journée
Scrib

 

[Bernard_XLD]

Bonjour scrib, le forum

Mais qu'est ce qui peut bien vous empêcher de créer un fichier light exposant votre problème. Comment voulez vous que, sans fichier et sans code, on puisse vous répondre sans jouer aux devinettes et sans perdre notre temps.

Cordialement, @+

 

[scrib]

Bonjour Bernard,

Désolé, mais je viens de comprendre mon erreur, quand j'écris :
feuil1.cells(1,1).value = "123456"

VBA ne comprends pas que c'est du texte et met le format de la cellule en nombre. Du coups, comment convertir le "123456" en format texte?
J'ai peur qu'en convertissant la colonne 1 en format texte "manuellement" (clic droit, format cellule, etc...) l'erreur revienne à la prochaine réinitialisation.


Merci pour vos réponses à venir

Scrib

 

[Staple1600]

Bonjour le fil

Pour juste répondre à ceci

Du coups, comment convertir le "123456" en format texte?

Sub En_Texte()
Feuil1.Cells(1).NumberFormat = "@"
Feuil1.Cells(1).Value = "123456"
End Sub

PS: A partir du moment, où le mot de passe est en clair dans le classeur, quel est l'intérêt ?
Un petit curieux aura vite fait de trouver le mot de passe 😉

 

[scrib]

Bonjour Staple1600,
Merci pour la réponse, j'avais bien essayé ce code, mais ça ne fonctionné pas, mais j'avais peuxx être fait une erreur dans l'écriture.
La feuille sur laquelle se trouve les identifiants et mots de passe est cachée. Le code VBA est verrouillé par un mot de passe, mais si quelqu'un veut vraiment trouver, il est clair qu'avec tous les logiciels qui circulent sur internet, il pourra trouver les mots de passe et les identifiants.

 

[Staple1600]

Re

@scrib
Si cela ne fonctionnait pas, je ne l'aurai pas posté 🙄
Mon code VBA fait deux lignes, le tien une ligne
Et j'ai écrit Feuil1.Cells(1) là où tu as écrit Feuil1.Cells(1,1)
Ce n'est donc pas le même code 😉

Donc le bout de code que j'ai posté fait ceci
1) Il formate la cellule A1 en texte
2) Il inscrit le "mot de passe" en A1
Et si on regarde ensuite A1 en faisant Format/Cellules, on verra que la cellule est bien au format Texte.

 

[scrib]

Re,

Merci staple1600, mon problème est résolu grâce à toi.

Bonne journée à tous