[Résolu][VBA][UserForm] Vidange de textbox conditionnel dans un userform

Verba_Tim · 19 Août 2011

Salutation

J'ai de nouveau un problème avec mon vilain userform...
Tout marchait très bien jusqu'à ce que je trouve qu'il serait bien de vider automatiquement mes textbox en cas de saisi invalides...
Le problème est que la commande suivante ne marche pas ("incompatibilité de type"...)
Aurais-je mal utiliser ma formule??
Mon petit bout de code rebel:

Code:

If IsNumeric(TextBox1.Value) = False Then MsgBox ("Valeur non numérique") And TextBox1.Value = ""

Une idée??

Au plaisir de vous lire,

VB_Tim

Verba_Tim · 19 Août 2011

Re : [VBA][UserForm] Vidange de textbox conditionnel dans un userform

Solution trouvé ^^
Il suffit de faire:

Code:

Do Until X = 1
If IsNumeric(TextBox1.Value) = False Then
    MsgBox ("Valeur non numérique")
Else:
    Exit Do
End If
TextBox1.Value = Null
Loop

Merci quand même

Bonne journée

VB_Tim

[Résolu][VBA][UserForm] Vidange de textbox conditionnel dans un userform

Verba_Tim

XLDnaute Occasionnel

Verba_Tim

XLDnaute Occasionnel

Discussions similaires