FORMAT NUM sous userform Résolu/Fermé

Question

salut tout le monde, 
j'ai crée un tableau de calcule sous excel, et pour saisir les  données j'ai crée un userform
le problème c'est que je saisis sous userform  un numero avec decimal (ex 6,5) dans le tableau de calcul sous excel cette valeur  elle se concidere comme format texte

par exemple si j 'entre dans 
textbox1 ---- 5
textbox2 ---- 7
textbox3  ---- 11,5

la 4 eme colonne où il ya la somme des 3 valeurs (textbox1 2 et 3)
la valeur entrer dans textbox3 est concidrer comme valeur texte
 le code

vs.Cells(irow, 1).Value = Me.TextBox1.Value
vs.Cells(irow, 2).Value = Me.TextBox2.Value
vs.Cells(irow, 3).Value = Me.TextBox3.Value
je voudrais savoir comment saisir format numerique 

Merci bien
Configuration: Windows XP / Chrome 27.0.1453.94

pilas31 · Answer

Bonjour,

En fait le séparateur de décimale "virgule" est interprété comme du texte en VBA. Donc il n'existe que deux possibilités simples.

1/ saisir les décimales en utilisant le point dans l'exemple :
5
7
11.5

Fonctionne correctement.

2/ Convertir les chaines en décimale avec l'instruction suivante :

vs.Cells(irow, 1).Value = CDbl(Me.TextBox1.Value)
vs.Cells(irow, 2).Value = CDbl(Me.TextBox2.Value)
vs.Cells(irow, 3).Value = CDbl(Me.TextBox3.Value)
 

Mais rien n'est parfait. Dans le premier cas rien n'empêche l'utilisateur de saisir une virgule et dans le second cas si il saisit un texte quelconque cela provoque une erreur.

Cordialement,

abouziad2010 · Answer

Merci
on tout cas ça marche et c'est mieux