Format Monétaire dans TextBox

[Denis]

Bonjour à tous
pour donner le format monétaire d'un textbox, j'aimerais utiliser le format de monnaie et le type de monnaie que l'on programme dans le tableau de config (et oui bizarre, il y a 2 monnaies nationales en cours là ou je suis !)
quelqu'un a t'il une petite idée ?
Merci à tous
@+ Denis

 

[michel]

bonsoir denis

j'espere que l'exemple ci dessous pourra t'aider

TextBox1 = Format(TextBox1, "#,##0.00 USD")


bonne soiree
michel

 

[Denis]

Bonjour Michel et le Forum
en fait, Michel, ce que je cherche c'est comme "Date" va chercher la date système, c'est de récupérer le format de monnaie que l'on programme dans le panneau de config et qui devient le format système
Merci quand même de ta réponse
@+ Denis

 

[michel]

bonjour Denis

je ne suis pas sur d'avoir bien compris mais tu peux essayer


Private Sub CommandButton1_Click()
TextBox1 = Format(TextBox1, "#,##0.00") & Application.International(25)
End Sub


Application.International(25) permet d'afficher le symoble monetaire du poste de travail ( testé avec XP)


bonne soiree
michel

 

[Denis]

Bonjour Michel et le forum
merci de ton aide Michel, c'est exactement cela que je cherchais
j'essais de suite
Merci et @+
Denis