Discussion :

[QiannanWANG]

Bonjour à tous,

Je crée un interface pour transmettre les données de UserForm à Feuil, j'ai rencontré un problème, c'est quand j'ai une valeur 3 chiffres après virgule, excel pense mon virgule c'est un séparateur milliers, (mon 1.111 deviens 1111). Je voudrais que l'utilisateur peut utilise "," or "." comme un séparateur décimale dans un TextBox de UserForm.

J'ai utilise les codes :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Dim MonValue as Double
TextBox1.value=val(TextBox1.value)
MonValue=TextBox1.value
Sheets("Feuil1").Range("A1").value=MonValue

Je trouve quand je entre un valeur par TextBox1 avec 1 or 2 chiffre après virgule ou point , je peux bien obtenir un nombre qui affiche avec virgule comme séparateur décimale dans la cellule A1 : par exemple, je peux obtenir 1,11
mais quand je entre un valeur avec 3 chiffre après virgule ou point , Excel il considère le virgule dans MonValue(qui est déjà un nombre de 3 chiffre après virgule ex.1,111) comme un séparateur décimale, dans cellule A1, il affiche 1 111,000.


Je pense c'est un problème de setting "séparateur décimale" et "séparateur millers", Excel il connais le virgule comme un séparateur milliers quand il y a 3 chiffre après virgule, j'ai essayé de changer le setting dans option avancée ( mais en fait je sais pas je doit comment changer), mais le affichage dans sheet ne change pas.
Je pense aussi c'est le format de TextBox, ça veut dire je ne peux pas utilise les deux "," et " ." dans textbox. mais j'ai réussi quand j'ai 2 chiffres après virgule, donc ... je sais pas

Merci d'avance pour votre réponses!!!!!!!!

[ARTURO83]

Bonjour,

Je n'arrive pas à reproduire votre problème, mais essayez ceci:
-Supprimez (ou mettez en remarque) la ligne:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

TextBox1.value=val(TextBox1.value)

-Sur la cellule de destination A1, appliquez le format personnalisé suivant :_-* # ##0,0000

Cdlt