bonjour à vous tous, alors voila je voulais savoir dans mon userform j'ai 2
textes et on doit saisir dans l'une ou l'autre, est ce qu'il est possible de
griser et rendre inutilisable la 2eme textbox si la 1ère est utilisé et meme
chose dans le sens contraire. Merci bien pour votre aide
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Jacques93
Bonjour j0b,
Essaie :
Private Sub TextBox1_Change() With Me.TextBox2 If Len(Me.TextBox1.Text) > 0 Then .Text = "" .BackColor = vbButtonFace .Enabled = False Else .BackColor = vbWhite .Enabled = True End If End With End Sub
Private Sub TextBox2_Change() With Me.TextBox1 If Len(Me.TextBox2.Text) > 0 Then .Text = "" .BackColor = vbButtonFace .Enabled = False Else .BackColor = vbWhite .Enabled = True End If End With End Sub
bonjour à vous tous, alors voila je voulais savoir dans mon userform j'ai 2 textes et on doit saisir dans l'une ou l'autre, est ce qu'il est possible de griser et rendre inutilisable la 2eme textbox si la 1ère est utilisé et meme chose dans le sens contraire. Merci bien pour votre aide
-- Cordialement,
Jacques.
Bonjour j0b,
Essaie :
Private Sub TextBox1_Change()
With Me.TextBox2
If Len(Me.TextBox1.Text) > 0 Then
.Text = ""
.BackColor = vbButtonFace
.Enabled = False
Else
.BackColor = vbWhite
.Enabled = True
End If
End With
End Sub
Private Sub TextBox2_Change()
With Me.TextBox1
If Len(Me.TextBox2.Text) > 0 Then
.Text = ""
.BackColor = vbButtonFace
.Enabled = False
Else
.BackColor = vbWhite
.Enabled = True
End If
End With
End Sub
bonjour à vous tous, alors voila je voulais savoir dans mon userform j'ai 2
textes et on doit saisir dans l'une ou l'autre, est ce qu'il est possible de
griser et rendre inutilisable la 2eme textbox si la 1ère est utilisé et meme
chose dans le sens contraire. Merci bien pour votre aide
Private Sub TextBox1_Change() With Me.TextBox2 If Len(Me.TextBox1.Text) > 0 Then .Text = "" .BackColor = vbButtonFace .Enabled = False Else .BackColor = vbWhite .Enabled = True End If End With End Sub
Private Sub TextBox2_Change() With Me.TextBox1 If Len(Me.TextBox2.Text) > 0 Then .Text = "" .BackColor = vbButtonFace .Enabled = False Else .BackColor = vbWhite .Enabled = True End If End With End Sub
bonjour à vous tous, alors voila je voulais savoir dans mon userform j'ai 2 textes et on doit saisir dans l'une ou l'autre, est ce qu'il est possible de griser et rendre inutilisable la 2eme textbox si la 1ère est utilisé et meme chose dans le sens contraire. Merci bien pour votre aide
-- Cordialement,
Jacques.
j0b
Merci bien je vais tester cela, merci encore et bonne journée
"Jacques93" wrote:
Bonjour j0b,
Essaie :
Private Sub TextBox1_Change() With Me.TextBox2 If Len(Me.TextBox1.Text) > 0 Then .Text = "" .BackColor = vbButtonFace .Enabled = False Else .BackColor = vbWhite .Enabled = True End If End With End Sub
Private Sub TextBox2_Change() With Me.TextBox1 If Len(Me.TextBox2.Text) > 0 Then .Text = "" .BackColor = vbButtonFace .Enabled = False Else .BackColor = vbWhite .Enabled = True End If End With End Sub
bonjour à vous tous, alors voila je voulais savoir dans mon userform j'ai 2 textes et on doit saisir dans l'une ou l'autre, est ce qu'il est possible de griser et rendre inutilisable la 2eme textbox si la 1ère est utilisé et meme chose dans le sens contraire. Merci bien pour votre aide
-- Cordialement,
Jacques.
Merci bien je vais tester cela, merci encore et bonne journée
"Jacques93" wrote:
Bonjour j0b,
Essaie :
Private Sub TextBox1_Change()
With Me.TextBox2
If Len(Me.TextBox1.Text) > 0 Then
.Text = ""
.BackColor = vbButtonFace
.Enabled = False
Else
.BackColor = vbWhite
.Enabled = True
End If
End With
End Sub
Private Sub TextBox2_Change()
With Me.TextBox1
If Len(Me.TextBox2.Text) > 0 Then
.Text = ""
.BackColor = vbButtonFace
.Enabled = False
Else
.BackColor = vbWhite
.Enabled = True
End If
End With
End Sub
bonjour à vous tous, alors voila je voulais savoir dans mon userform j'ai 2
textes et on doit saisir dans l'une ou l'autre, est ce qu'il est possible de
griser et rendre inutilisable la 2eme textbox si la 1ère est utilisé et meme
chose dans le sens contraire. Merci bien pour votre aide
Merci bien je vais tester cela, merci encore et bonne journée
"Jacques93" wrote:
Bonjour j0b,
Essaie :
Private Sub TextBox1_Change() With Me.TextBox2 If Len(Me.TextBox1.Text) > 0 Then .Text = "" .BackColor = vbButtonFace .Enabled = False Else .BackColor = vbWhite .Enabled = True End If End With End Sub
Private Sub TextBox2_Change() With Me.TextBox1 If Len(Me.TextBox2.Text) > 0 Then .Text = "" .BackColor = vbButtonFace .Enabled = False Else .BackColor = vbWhite .Enabled = True End If End With End Sub
bonjour à vous tous, alors voila je voulais savoir dans mon userform j'ai 2 textes et on doit saisir dans l'une ou l'autre, est ce qu'il est possible de griser et rendre inutilisable la 2eme textbox si la 1ère est utilisé et meme chose dans le sens contraire. Merci bien pour votre aide