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

Verba_Tim

XLDnaute Occasionnel
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
 
Dernière édition:

Verba_Tim

XLDnaute Occasionnel
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
 

Statistiques des forums

Discussions
283 806
Messages
1 854 601
Membres
152 560
dernier inscrit
Hmidacod
Haut Bas