Interdire entrée de texte

[ALICIA]

Bonsoir Forum, c'est Alicia...

Voial j'ai un textbox sur une feuille et je voudrais y interdire l'entrée de texte et autres ponctuations... (ne permettre que des nombres!!!)

Quelle va etre la macro qui va me permettre ceci?

Merci a vous

 

[pat1545.]

Salut Alicia,

ceci peut etre ?

If Not IsNumeric(TextBox1) Then



Patrick

 

[ALICIA]

Hello Pat1545

Coucou, merci pour ta reponse mais puis je te demander une precision?

If Not IsNumeric(TextBox1) Then
C'est pour ; ' Si l'entrée du textbox n'est pas un chiffre' ????

Merci

Bisous

 

[pat1545.]

J'ai essayé et il n'est autorisé que des chiffres...

Patrick

 

[ALICIA]

Merci Pat

 

[ALICIA]

Re Pat,

Je viens d'essayer, mais je ne comprnd pas bien ta formule...

Qu'est ce que je dois mettre en dessous de
If Not IsNumeric(TextBox1) Then

???

Merci

 

[Eric C]

Bonjour le forum
Bonjour Alicia, bonjour Patrick

Pour t'aider un peu plus, tu entres ceci :

Private Sub TextBox1_Change()
If Not IsNumeric(TextBox1) Then
MsgBox 'Vous ne pouvez entrer que des chiffres', vbCritical
TextBox1.SelStart = 0
TextBox1.SelLength = Len(TextBox1)
End If
End Sub

Bon ouikand à toutes & à tous 😉

 

[Eric C]

Bonjour le forum
Bonjour Alicia, bonjour Patrick

Pour t'aider un peu plus, tu entres ceci :

Private Sub TextBox1_Change()
If Not IsNumeric(TextBox1) Then
MsgBox 'Vous ne pouvez entrer que des chiffres', vbCritical
TextBox1.SelStart = 0
TextBox1.SelLength = Len(TextBox1)
End If
End Sub

Bon ouikand à toutes & à tous 😉

 

[ALICIA]

Re Pat, Lut Eric

Merci Eric c'est exactement ca qu'il me fallait

A+

Bises