Userform et textbox

fmoore

XLDnaute Junior
Bonjour,

Quand je lance mon userform j'ai les textbox suivants :

TextBox3 = Sheets("Feuil1").Range("C3") * 100
TextBox4 = Sheets("Feuil1").Range("C6")
TextBox5 = Sheets("Feuil1").Range("C5")
TextBox1 = Sheets("Feuil1").Range("C1")
TextBox2 = Sheets("Feuil1").Range("C2")
TextBox6 = Sheets("Feuil1").Range("F2")

Tout fonctionne bien sauf quand il a des décimales ça inscrit 5,72 au lieu de 5.72. Je dois avoir le point et non la virgule sinon par la suite ma commande ne fonctionne pas.

Avez-vous une idée de comment je peux le faire, j'ai essayé de plusieurs façons et rien ne fonctionne.

Merci de votre temps !
 

cathodique

XLDnaute Barbatruc
Bonsoir fmoore :),

Une textbox ne peut que du texte qu'il faut convertir selon tes besoins.
Avec Les paramètres régionaux français dans Excel le séparateur de décimaux est la virgule.
Par contre dans le VBE, les paramètres sont toujours en anglais d'où une corvée supplémentaire
pour la langue de Molière.

Avec un petit fichier, avec données anonymes on comprendrait mieux ton souci.

Bonne soirée.
 

fmoore

XLDnaute Junior
Bonjour,

Dans l'optique d'aide au suivant, j'inscris les formules que j'ai enfin réussi à changer mes , en . avec les formules suivantes :

TextBox3.Value = Replace(Range("C3").Value * 100, ",", ".")
TextBox4.Value = Replace(Range("C6").Value, ",", ".")
TextBox5.Value = Replace(Range("C5").Value, ",", ".")
TextBox1 = Sheets("Feuil1").Range("C1")
TextBox2 = Sheets("Feuil1").Range("C2")
TextBox6 = Sheets("Feuil1").Range("F2")

Merci de votre temps !
 

Statistiques des forums

Discussions
311 725
Messages
2 081 945
Membres
101 849
dernier inscrit
florentMIG