OVH Cloud OVH Cloud

ne reconnais pas les chiffre.

3 réponses
Avatar
Daniel
Bonsoir
J'ai un problème pour mes mot de passe & ou les utilisateur.
Lorsque dans ma liste "Users" il y a seulement des chiffres comme mot de
passe ou comme utilisateur,
il ne sont pas reconnue Pourquoi???
& comment contourner ce problème !
J'ai assaillez les misse en forme rein a faire !!


Private Sub UserForm_Initialize()
With CreateObject("WScript.NetWork")
TextBox1.Value = .UserName
TextBox2.SetFocus
End With
End Sub

Private Sub CommandButton1_Click()
Static x
util = TextBox1.Value
rec:
trouve = Format(Not IsError(Application.Match(util,
Range("Users").Columns(1), 0)))
ligne = Application.Match(util, Range("Users").Columns(1), 0)
If util <> "" And trouve = True Then
p = Sheets("Donné").Cells(ligne, 38)
If TextBox2.Value = p Then
x = 0
ReplaceFenêtre
Unload UserForm1
Exit Sub
Else
x = x + 1
MsgBox ("Mot de passe invalide")
TextBox2.SetFocus
End If
Else
x = x + 1
MsgBox ("Utilisateur inconnu")
TextBox1.SetFocus
End If
If x > 2 Then
ThisWorkbook.Close SaveChanges:=False
End If
End Sub

3 réponses

Avatar
Starwing
Bonjour,

Tous les mots de passe des utilisateurs sont sans doute
sur des cellules de Types Standard...
Il faut tout simplement formater les cellules en format
texte.

Avant toute chose, il faut effacer tous les mots de passe,
de tes cellules, formater les cellules en format texte
puis réinscrire les mots de passe.

Starwing
Avatar
Shnoulle
Salut Daniel,

Je confirme ce que pense starwing

mais Starwing, je propose quelquechose de plus rapide:
Avant toute chose, il faut effacer tous les mots de passe,
de tes cellules, formater les cellules en format texte
puis réinscrire les mots de passe.


Un peu plus rapide,

avec la formule =if (estnum(A1);texte(A1;"0");"A1")
et recopie en valeur suer la colonne en texte


A+


Starwing wrote:
Bonjour,

Tous les mots de passe des utilisateurs sont sans doute
sur des cellules de Types Standard...
Il faut tout simplement formater les cellules en format
texte.

Avant toute chose, il faut effacer tous les mots de passe,
de tes cellules, formater les cellules en format texte
puis réinscrire les mots de passe.

Starwing



Avatar
Daniel
Bonsoir Shnoulle
Très bien cela va, j'ai effacer et changer le format .
Merci. :-))

"Shnoulle" a écrit dans le message de
news:
Salut Daniel,

Je confirme ce que pense starwing

mais Starwing, je propose quelquechose de plus rapide:
Avant toute chose, il faut effacer tous les mots de passe,
de tes cellules, formater les cellules en format texte
puis réinscrire les mots de passe.


Un peu plus rapide,

avec la formule =if (estnum(A1);texte(A1;"0");"A1")
et recopie en valeur suer la colonne en texte


A+


Starwing wrote:
Bonjour,

Tous les mots de passe des utilisateurs sont sans doute
sur des cellules de Types Standard...
Il faut tout simplement formater les cellules en format
texte.

Avant toute chose, il faut effacer tous les mots de passe,
de tes cellules, formater les cellules en format texte
puis réinscrire les mots de passe.

Starwing