Remplacer virgule par point dans userform

Question

Bonjour,

J'ai un userform qui s'appelle A, puis ce userform contient 15 texbox nommés ID1, ID2, ID 3...jusqu'à ID15

Quand je fais charger les données Exel dans les texbox, j'ai des valeur en virgule au lieu de point. Exemple : 12,5 au lieu de 12.5  et donc mes calculs sont biaisés.


J'ai essayé la fonction re,mplacer mais ça ne marche pas. Voici mon code, certainement il y a un problème:
for i=1 to 15
A.Controls("ID"&I).value.replace  "," , "."
next

Merci de m'aider et de me dire aussi si je pourrais directement avoir les point lors du chargement dans les texbox. MERCI!!

cs_Le Pivert · Accepted Answer

Bonjour,

Je pense que c'est du vba:

Option Explicit
Private Sub CommandButton1_Click()
Dim Ctrl As Control
 For Each Ctrl In UserForm1.Controls
 If TypeName(Ctrl) = "TextBox" Then
Ctrl.Value = Replace(Ctrl.Value, ",", ".")
 End If
 Next
End Sub

Polux31 · Answer

Bonjour,

C'est quel langage ?

Remplacer virgule par point dans userform

2 réponses

Discussions similaires

Newsletters