Format Monétaire dans TextBox

M

michel

Guest

• 1 Avril 2004

• #2

bonsoir denis

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

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


bonne soiree
michel

 

Vote positif 0 Vote négatif

D

Denis

Guest

• 2 Avril 2004

• #3

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

 

Vote positif 0 Vote négatif

M

michel

Guest

• 2 Avril 2004

• #4

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

 

Vote positif 0 Vote négatif

D

Denis

Guest

• 3 Avril 2004

• #5

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

 

Vote positif 0 Vote négatif