Valeur Textbox donne valeur d'une autre textbox
Le
Alex
Bonjour à tous,
Je rencontre un problème dans un userform avec plusieurs textbox. Je
souhaiterai qu'en fonction de la 1ère lettre de la valeur de mon
textbox1 (ESI) (ESI commence toujours par A, G, ou M), alimente une
seconde textbox2 (Enseigne), j'ai écrit cela, mais cela ne semble pas
fonctionner :
'Si valeur de mon textbox1 commence par A (1 caractère à gauche)
alors
If Me.ESI.Value = "A" Like "*" & Left(Me.ESI, 1) & "*" = True Then
'Mon second textbox aura la valeur :
Me.Enseigne.Value = "Accord"
End If
Quelqu'un aurait il la solution à mon problème ?
Merci par avance de votre aide.
Bien cordialement.
Alex
Je rencontre un problème dans un userform avec plusieurs textbox. Je
souhaiterai qu'en fonction de la 1ère lettre de la valeur de mon
textbox1 (ESI) (ESI commence toujours par A, G, ou M), alimente une
seconde textbox2 (Enseigne), j'ai écrit cela, mais cela ne semble pas
fonctionner :
'Si valeur de mon textbox1 commence par A (1 caractère à gauche)
alors
If Me.ESI.Value = "A" Like "*" & Left(Me.ESI, 1) & "*" = True Then
'Mon second textbox aura la valeur :
Me.Enseigne.Value = "Accord"
End If
Quelqu'un aurait il la solution à mon problème ?
Merci par avance de votre aide.
Bien cordialement.
Alex
Poser une question
Bonjour,
pas sur d'avoir compris ce que tu essaies de faire, mais voici ce que je te propose sur base de ce que j'ai compris.
If Left(Me.ESI, 1) = "A" Then
--
h2so4
'----------------------------------
Dim X As String
X = Left(trim(me.ESI),1)
Select Case UCase(X)
Case is = "A"
Me.Enseigne = "Accord"
Case is = "G"
Me.Enseigne = "Toto"
Case is = "M"
Me.Enseigne = "Titi"
End Select
'----------------------------------
Dans le Select Case, si peu importe la lettre A, G ou M, le textbox Enseigne = "Accord"
Tu peux mettre les lettres dans le même "CAse"
'----------------------------------
Dim X As String
X = Left(trim(me.ESI),1)
Select Case UCase(X)
Case is = "A", "G", "M"
Me.Enseigne = "Accord"
End Select
'----------------------------------
MichD
------------------------------------------
"Alex" a écrit dans le message de groupe de discussion :
Bonjour à tous,
Je rencontre un problème dans un userform avec plusieurs textbox. Je
souhaiterai qu'en fonction de la 1ère lettre de la valeur de mon
textbox1 (ESI) (ESI commence toujours par A, G, ou M), alimente une
seconde textbox2 (Enseigne), j'ai écrit cela, mais cela ne semble pas
fonctionner :
'Si valeur de mon textbox1 commence par A (1 caractère à gauche)
alors
If Me.ESI.Value = "A" Like "*" & Left(Me.ESI, 1) & "*" = True Then
'Mon second textbox aura la valeur :
Me.Enseigne.Value = "Accord"
End If
Quelqu'un aurait il la solution à mon problème ?
Merci par avance de votre aide.
Bien cordialement.
Alex
Merci pour vos réponses.
J'ai conservé celle proposé par h2so4 qui fonctionne très bien.
Et je tiens vraiment à remercier l'ensemble des membres du groupe pour
leurs aides précieuses.
Bien cordialement.
Alex