Export vers word avec format

Bonjour à toutes et tous !

pour commencer, je souhaite à tout le monde une excellente année, pleine de codes bizarres, et surtout pleine d'aide envers les gars comme moi

voila mon problème :

je fais une macro excel permettant d'exporter des valeurs de cellules, tableaux et graphiques vers un fichier word.

je pensais que j'allais galérer sur les graphiques et tableaux, mais finalement, c'est ce qui m'a posé le moins de problèmes.

Par contre, j'ai un souci avec l'export des valeurs de cellules

J'utilise le code suivant :

WordDoc.Bookmarks("Mtt_fds_ccial_compta").Range.Text = Range("Mtt_fds_ccial_compta").Value

donc ma valeur s'exporte bien, mais perds le format qui était sous excel (soit un nombre sans décimales, soit un pourcentage)

par exemple, sous excel, j'ai "95 000 €", et sous word, je me retrouve avec "95000,08"

je comprends pourquoi, vu que dans mon code, j'envoie la "valeur" et pas le format.

Ma question est donc : Comment faire pour envoyer la valeur ainsi que le format?

Un immense merci à quiconque pourra m'aider

@++

ju

Bonjour,

Avec Format() :

WordDoc.Bookmarks("Mtt_fds_ccial_compta").Range.Text = Format(Range("Mtt_fds_ccial_compta").Value, "#0 €")

tu es formidable !

ça marche niquel

merci beaucoup !

Rechercher des sujets similaires à "export word format"