Discussion :

[amnorian]

Bonjour,

dans une msgbox j'indique plusieurs information dont un somme de valeur.

Cette valeur étant assez importante je voudrais pour une meilleure lecture lui appliquer un style ou un numberformat de ce type

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

NumberFormat = "#,##0.00 $"

Mais comme il s'agit d'une variable, je ne peux pas attribuer la commande numberformat ni les espacement

Dans le code suivant la derniere ligne ne fonctionne pas.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
dim sommetotal as currency
Sommetotal = Application.WorksheetFunction.Sum(Range("c1:c100000"))
sommetotal.NumberFormat = "#,##0.00 $"

une idée ?
Merci d'avance pour votre aide

[QuestVba]

Bonjour

ceci est comment ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Dim sommetotal As Currency
sommetotal = Application.Sum(Range("c1:c1000"))
MsgBox Format(sommetotal, "#,##0.00 $")

[Kimy_Ire]

Heu...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

MsgBox Format(valeur, "#,##0.00 $")

???

EDIT : QuestVBA était le premier ! ^^

[amnorian]

Merci beaucoup ça fonctionne très bien.