Nombres uniquement dans un TextBox

Bonsoir le forum

Dans un TextBox peut on autorise que des nombres en écriture

ex: j'écris M50 dans le TextBox en validant je voudrais un refus de validé

mais si écris 50 la valide est accepte

a oui que pour les TextBox2 et TextBox3

voici le code de mon userform

Option Explicit

Dim Ligne As Long

Private Sub CmbAnnuler_Click()

Unload Me

End Sub

Private Sub CmbValider_Click()

With Sheets("Base")

.Range("C" & Ligne) = UCase(Me.TextBox2.Value)

.Range("D" & Ligne) = UCase(Me.TextBox3.Value)

.Range("E" & Ligne) = UCase(Me.TextBox4.Value)

End With

Affichage

Unload Me

End Sub

Private Sub userform_initialize()

Ligne = Sheets("Liste").Range("J" & Sheets("Liste").Range("K1"))

With Sheets("Base")

Me.TextBox2 = .Range("C" & Ligne)

Me.TextBox3 = .Range("D" & Ligne)

Me.TextBox4 = .Range("E" & Ligne)

End With

End Sub

pour moi je suis dépassé

cordialement

aiglon74

Bonsoir,

Ci-joint une proposition à tester.

Bonne soirée

Bouben

14controlesaisie.xlsm (23.51 Ko)

Bonsoir,

Ayez la bonne habitude de joindre le fichier pour faciliter le test.

Bonsoir

tout d'abord merci pour ta réponse

qui pour moi va bien réglé le petit souci que j'avais

merci encore pour le partage de tes connaissances

A+

Aiglon74

Re-

C'était un peu buggé, je crois

Une nouvelle version

Bouben

Re

oui un peu buggé

mais tu ma montrer la voie

a moi de faire le chemin

de l'adapté a mon fichier

mais merci pour ton aide

Aiglon74

Rechercher des sujets similaires à "nombres uniquement textbox"