Format standard avec separateur de millier

[Patrice Dargenton]

Bonjour,

j'ai une petite colle sous Excel : comment appliquer le format standard tout
en appliquant le séparateur de millier ?
Si j'utilise le format # ##0,### j'ai toujours la virgule qui s'affiche,
même pour les nombres entiers, alors que le format standard supprime bien la
virgule dans ce cas, mais par contre le format standard n'applique pas le
séparateur de millier : quelqu'un a une solution ?

Merci pour toute réponse.
-------------------------------------------------------
Patrice Dargenton
***@free.fr
http://patrice.dargenton.free.fr/index.html
-------------------------------------------------------

[FS]

Bonjour,

Une discussion récente à ce sujet qui devrait te donner des idées :

http://groups.google.fr/group/microsoft.public.fr.excel/browse_thread/thread/6db1807fe6c3f98d/16675ee26d23a83c?hl=fr&q=format+nombre+group:*fr.excel#16675ee26d23a83c

FS
--
Frédéric SIGONNEAU
Modules et modèles pour Excel :
http://frederic.sigonneau.free.fr/

Post by Patrice Dargenton
Bonjour,
j'ai une petite colle sous Excel : comment appliquer le format standard tout
en appliquant le séparateur de millier ?
Si j'utilise le format # ##0,### j'ai toujours la virgule qui s'affiche,
même pour les nombres entiers, alors que le format standard supprime bien la
virgule dans ce cas, mais par contre le format standard n'applique pas le
séparateur de millier : quelqu'un a une solution ?
Merci pour toute réponse.
-------------------------------------------------------
Patrice Dargenton
http://patrice.dargenton.free.fr/index.html
-------------------------------------------------------

[Modeste]

Post by FS
http://groups.google.fr/group/microsoft.public.fr.excel/browse_thread/thread/6db1807fe6c3f98d/16675ee26d23a83c?hl=fr&q=format+nombre+group:*fr.excel#16675ee26d23a83c

;o)))
à n'en pas douter, la question suivante sera ....
et comment aligne-t-on l'ensemble sur le chiffre des unités ???
;o)))

[FS]

Salut Gilbert,

Dans ce cas, nul doute que l'ami Patrice saura où chercher !

:)

FS
--
Frédéric SIGONNEAU
Modules et modèles pour Excel :
http://frederic.sigonneau.free.fr/

Post by Modeste

http://groups.google.fr/group/microsoft.public.fr.excel/browse_thread/thread/6db1807fe6c3f98d/16675ee26d23a83c?hl=fr&q=format+nombre+group:*fr..excel#16675ee26d23a83c

;o)))
à n'en pas douter, la question suivante sera ....
et comment aligne-t-on l'ensemble sur le chiffre des unités ???
;o)))

[Patrice Dargenton]

Merci, j'y ai en effet trouvé quelque chose de pas mal (l'utilisation de
macro me semble trop lourde) :
[>12]# ##0,00;# ##0
Si on peut mettre une condition devant le format, il suffit de tester si le
nombre est entier ou pas, je vais voir s'il y a une solution simple avec ce
système, merci en tout cas.
(c'est marrant que Google n'indexe pas encore la solution clairement...)
-------------------------------------------------------
Patrice Dargenton
***@free.fr
http://patrice.dargenton.free.fr/index.html
-------------------------------------------------------

Post by FS
Salut Gilbert,
Dans ce cas, nul doute que l'ami Patrice saura où chercher !
:)
FS
--
Frédéric SIGONNEAU
http://frederic.sigonneau.free.fr/

Post by Modeste

http://groups.google.fr/group/microsoft.public.fr.excel/browse_thread/thread/6db1807fe6c3f98d/16675ee26d23a83c?hl=fr&q=format+nombre+group:*fr..excel#16675ee26d23a83c

;o)))
à n'en pas douter, la question suivante sera ....
et comment aligne-t-on l'ensemble sur le chiffre des unités ???
;o)))

[Patrice Dargenton]

Je n'ai finalement trouvé aucune solution, j'ai pourtant cherché aussi en
anglais.
Par contre j'ai eu une autre idée : mon fichier est produit par automation :
je peux donc changer le format si la valeur est entière au moment d'écrire
la valeur.
Ainsi je n'ai pas besoin de mettre de macro dans le fichier Excel (cette
solution n'est pas possible, car les fichiers Excel sont diffusés un peu
partout et on ne peut pas présumer de la politique de sécurité de l'endroit
où ils seront utilisés).

Public Const sFormatNombreReel$ = "# ##0,###"
' Pas de décimal donc pas de virgule qui traine, mais un séparateur de
millier (espace)"
Public Const sFormatNombreEntier$ = "# ##0"

Private Sub DefinirFormatReelExcel(ByVal oSht As Object, _
ByVal iLigne%, ByVal iCol%, ByVal rVal!)

' Pour les réels afficher 3 décimales avec le séparateur de millier
' mais lorsque la valeur est entière, ne pas laisser une virgule
orpheline

Dim sFormat$ = ""
If CInt(rVal) = rVal Then ' Test Entier
sFormat = sFormatNombreEntier
Else
sFormat = sFormatNombreReel
End If
oSht.Cells(iLigne, iCol).NumberFormat = sFormat

End Sub

-------------------------------------------------------
Patrice Dargenton
***@free.fr
http://patrice.dargenton.free.fr/index.html
-------------------------------------------------------

Post by Patrice Dargenton
Merci, j'y ai en effet trouvé quelque chose de pas mal (l'utilisation de
[>12]# ##0,00;# ##0
Si on peut mettre une condition devant le format, il suffit de tester si le
nombre est entier ou pas, je vais voir s'il y a une solution simple avec ce
système, merci en tout cas.
(c'est marrant que Google n'indexe pas encore la solution clairement...)
-------------------------------------------------------
Patrice Dargenton
http://patrice.dargenton.free.fr/index.html
-------------------------------------------------------

Post by FS
Salut Gilbert,
Dans ce cas, nul doute que l'ami Patrice saura où chercher !
:)
FS
--
Frédéric SIGONNEAU
http://frederic.sigonneau.free.fr/

Post by Modeste

http://groups.google.fr/group/microsoft.public.fr.excel/browse_thread/thread/6db1807fe6c3f98d/16675ee26d23a83c?hl=fr&q=format+nombre+group:*fr..excel#16675ee26d23a83c

;o)))
à n'en pas douter, la question suivante sera ....
et comment aligne-t-on l'ensemble sur le chiffre des unités ???
;o)))