thierry.bayard
XLDnaute Junior
Bonjour,
Je galère avec le format d'un textbox dont je veux exporter la valeur vers Excel.
J'ai un premier morceau de code pour mettre en forme le textbox dans le userform après modification de l'utilisateur :
J'en ai un second pour l'export vers Excel :
Les décimales s'affichent correctement dans le userform.
Après le transfert, sur Excel, j'ai bien une valeur au format nombre avec 2 décimales mais qui sont systématiquement à 00. Exemple : dans le userform, je saisie 12.25 ; sur excel, j'obtiens 12.00
Pouvez-vous m'aider ?
Merci d'avance,
Thierry
Je galère avec le format d'un textbox dont je veux exporter la valeur vers Excel.
J'ai un premier morceau de code pour mettre en forme le textbox dans le userform après modification de l'utilisateur :
Code:
Private Sub Text_prix_Exit(ByVal Cancel As MSForms.ReturnBoolean)
Text_prix.Text = Format(Replace(Text_prix.Text, ".", ","), "#,##0.00")
End Sub
J'en ai un second pour l'export vers Excel :
Code:
Range("A1") = Val(Format(Text_prix.Text, "0.00"))
Les décimales s'affichent correctement dans le userform.
Après le transfert, sur Excel, j'ai bien une valeur au format nombre avec 2 décimales mais qui sont systématiquement à 00. Exemple : dans le userform, je saisie 12.25 ; sur excel, j'obtiens 12.00
Pouvez-vous m'aider ?
Merci d'avance,
Thierry