Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

Empêcher la saisie d'espace dans un textbox

6 réponses
Avatar
Arnaud LECLEMENT
Bonjour tout le monde
Je souhaite interdire la saisie d'espace dans un textbox

Je vous remercie
Bonne journée
Arnaud

6 réponses

Avatar
anonymousA
bonjour,

Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)

If KeyAscii = 32 Then KeyAscii = 0

End Sub

A+

Bonjour tout le monde
Je souhaite interdire la saisie d'espace dans un textbox

Je vous remercie
Bonne journée
Arnaud




Avatar
Arnaud LECLEMENT
Bonjour anonymousA
Cela fonctionne très bien, je te remercie beaucoup.
Peux-tu me dire comment on peut saisir des espaces au milieu, mais empêcher
les espaces en début ou en fin toujours dans un textbox ?
Merci


"anonymousA" a écrit dans le message de news:
42da3b13$0$17467$
bonjour,

Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)

If KeyAscii = 32 Then KeyAscii = 0

End Sub

A+

Bonjour tout le monde
Je souhaite interdire la saisie d'espace dans un textbox

Je vous remercie
Bonne journée
Arnaud




Avatar
JièL Goubert
Bonjoir(c) Arnaud LECLEMENT

je pense qu'il serait nettement plus simple d'enlever les espaces (genre
avec la fonction SUPPRESPACE) aprés la saisie plutot que d'essayer de les
interdire pendant, non ?

--
JièL / Jean-Louis GOUBERT
La FAQ Outlook est la : http://faq.outlook.free.fr/

Le 17/07/2005 13:13 vous avez écrit ceci :
Bonjour anonymousA
Cela fonctionne très bien, je te remercie beaucoup.
Peux-tu me dire comment on peut saisir des espaces au milieu, mais empêcher
les espaces en début ou en fin toujours dans un textbox ?
Merci


"anonymousA" a écrit dans le message de news:
42da3b13$0$17467$

bonjour,

Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)

If KeyAscii = 32 Then KeyAscii = 0

End Sub

A+


Bonjour tout le monde
Je souhaite interdire la saisie d'espace dans un textbox

Je vous remercie
Bonne journée
Arnaud






Avatar
Arnaud LECLEMENT
Bonjour JièL et merci pour ta réponse.
Effectivement !
je vais "essayer" d'adapter cela en VBA
Arnaud

"JièL Goubert" a écrit dans le
message de news: %
Bonjoir(c) Arnaud LECLEMENT

je pense qu'il serait nettement plus simple d'enlever les espaces (genre
avec la fonction SUPPRESPACE) aprés la saisie plutot que d'essayer de les
interdire pendant, non ?

--
JièL / Jean-Louis GOUBERT
La FAQ Outlook est la : http://faq.outlook.free.fr/

Le 17/07/2005 13:13 vous avez écrit ceci :
Bonjour anonymousA
Cela fonctionne très bien, je te remercie beaucoup.
Peux-tu me dire comment on peut saisir des espaces au milieu, mais
empêcher les espaces en début ou en fin toujours dans un textbox ?
Merci


"anonymousA" a écrit dans le message de news:
42da3b13$0$17467$

bonjour,

Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)

If KeyAscii = 32 Then KeyAscii = 0

End Sub

A+


Bonjour tout le monde
Je souhaite interdire la saisie d'espace dans un textbox

Je vous remercie
Bonne journée
Arnaud








Avatar
ClémentMarcotte
Bonjour,

je vais "essayer" d'adapter cela en VBA
Arnaud


Excel 97 +

variable = rtrim(ltrim(textbox1.value))

Excel 2000 +

variable = trim(textbox1.value)

"Arnaud LECLEMENT" a écrit dans le message
de news:%
Bonjour JièL et merci pour ta réponse.
Effectivement !

"JièL Goubert" a écrit dans le
message de news: %
Bonjoir(c) Arnaud LECLEMENT

je pense qu'il serait nettement plus simple d'enlever les espaces (genre
avec la fonction SUPPRESPACE) aprés la saisie plutot que d'essayer de
les


interdire pendant, non ?

--
JièL / Jean-Louis GOUBERT
La FAQ Outlook est la : http://faq.outlook.free.fr/

Le 17/07/2005 13:13 vous avez écrit ceci :
Bonjour anonymousA
Cela fonctionne très bien, je te remercie beaucoup.
Peux-tu me dire comment on peut saisir des espaces au milieu, mais
empêcher les espaces en début ou en fin toujours dans un textbox ?
Merci


"anonymousA" a écrit dans le message de news:
42da3b13$0$17467$

bonjour,

Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)

If KeyAscii = 32 Then KeyAscii = 0

End Sub

A+


Bonjour tout le monde
Je souhaite interdire la saisie d'espace dans un textbox

Je vous remercie
Bonne journée
Arnaud












Avatar
Arnaud LECLEMENT
Merci beaucoup Clément c'est bien complet et très clair
Bonne journée
Arnaud

"ClémentMarcotte" a écrit dans le message de
news:
Bonjour,

je vais "essayer" d'adapter cela en VBA
Arnaud


Excel 97 +

variable = rtrim(ltrim(textbox1.value))

Excel 2000 +

variable = trim(textbox1.value)

"Arnaud LECLEMENT" a écrit dans le
message
de news:%
Bonjour JièL et merci pour ta réponse.
Effectivement !

"JièL Goubert" a écrit dans le
message de news: %
Bonjoir(c) Arnaud LECLEMENT

je pense qu'il serait nettement plus simple d'enlever les espaces
(genre
avec la fonction SUPPRESPACE) aprés la saisie plutot que d'essayer de
les


interdire pendant, non ?

--
JièL / Jean-Louis GOUBERT
La FAQ Outlook est la : http://faq.outlook.free.fr/

Le 17/07/2005 13:13 vous avez écrit ceci :
Bonjour anonymousA
Cela fonctionne très bien, je te remercie beaucoup.
Peux-tu me dire comment on peut saisir des espaces au milieu, mais
empêcher les espaces en début ou en fin toujours dans un textbox ?
Merci


"anonymousA" a écrit dans le message de news:
42da3b13$0$17467$

bonjour,

Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)

If KeyAscii = 32 Then KeyAscii = 0

End Sub

A+


Bonjour tout le monde
Je souhaite interdire la saisie d'espace dans un textbox

Je vous remercie
Bonne journée
Arnaud