J'ai un userform avec des textbox à remplir pour une recherche.
Je voudrais que le mot (unique) saisi dans chacune des textbox de mon
userform soit entouré d'astérisques sans que la personnes n'ai à le faire.
Exemple : *recherche*
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
ru-th
Salut
une possibilité Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean) If Left(TextBox1, 1) <> "*" Then TextBox1 = "*" & TextBox1 & "*" End Sub
a+ rural thierry "Vince" a écrit dans le message de news:
Bonjour,
J'ai un userform avec des textbox à remplir pour une recherche. Je voudrais que le mot (unique) saisi dans chacune des textbox de mon userform soit entouré d'astérisques sans que la personnes n'ai à le faire. Exemple : *recherche*
Comment faire ? Merci d'avance pour vos réponses.
Salut
une possibilité
Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
If Left(TextBox1, 1) <> "*" Then TextBox1 = "*" & TextBox1 & "*"
End Sub
a+
rural thierry
"Vince" <Vince@discussions.microsoft.com> a écrit dans le message de news:
30E860E7-F39A-4A34-88F7-E617F967AAE3@microsoft.com...
Bonjour,
J'ai un userform avec des textbox à remplir pour une recherche.
Je voudrais que le mot (unique) saisi dans chacune des textbox de mon
userform soit entouré d'astérisques sans que la personnes n'ai à le faire.
Exemple : *recherche*
une possibilité Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean) If Left(TextBox1, 1) <> "*" Then TextBox1 = "*" & TextBox1 & "*" End Sub
a+ rural thierry "Vince" a écrit dans le message de news:
Bonjour,
J'ai un userform avec des textbox à remplir pour une recherche. Je voudrais que le mot (unique) saisi dans chacune des textbox de mon userform soit entouré d'astérisques sans que la personnes n'ai à le faire. Exemple : *recherche*
Comment faire ? Merci d'avance pour vos réponses.
Vince
Ca marche effectivement !! Merci encore Vince
"ru-th" wrote:
Salut
une possibilité Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean) If Left(TextBox1, 1) <> "*" Then TextBox1 = "*" & TextBox1 & "*" End Sub
a+ rural thierry "Vince" a écrit dans le message de news:
Bonjour,
J'ai un userform avec des textbox à remplir pour une recherche. Je voudrais que le mot (unique) saisi dans chacune des textbox de mon userform soit entouré d'astérisques sans que la personnes n'ai à le faire. Exemple : *recherche*
Comment faire ? Merci d'avance pour vos réponses.
Ca marche effectivement !!
Merci encore
Vince
"ru-th" wrote:
Salut
une possibilité
Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
If Left(TextBox1, 1) <> "*" Then TextBox1 = "*" & TextBox1 & "*"
End Sub
a+
rural thierry
"Vince" <Vince@discussions.microsoft.com> a écrit dans le message de news:
30E860E7-F39A-4A34-88F7-E617F967AAE3@microsoft.com...
Bonjour,
J'ai un userform avec des textbox à remplir pour une recherche.
Je voudrais que le mot (unique) saisi dans chacune des textbox de mon
userform soit entouré d'astérisques sans que la personnes n'ai à le faire.
Exemple : *recherche*
une possibilité Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean) If Left(TextBox1, 1) <> "*" Then TextBox1 = "*" & TextBox1 & "*" End Sub
a+ rural thierry "Vince" a écrit dans le message de news:
Bonjour,
J'ai un userform avec des textbox à remplir pour une recherche. Je voudrais que le mot (unique) saisi dans chacune des textbox de mon userform soit entouré d'astérisques sans que la personnes n'ai à le faire. Exemple : *recherche*