Discussion :

[Jekriss]

Bonjour tout le monde !

Je suis en train de réaliser un petit programme automatisant la modification de fichiers Excel, mais je rencontre un problème au niveau des formats monétaires.

Pour résumer, le programme converti un fichier .xls déjà ouvert en .xlsx, puis fait des modifications dans le classeur et sauvegarde. Avant de fermer le nouveau fichier .xlsx, les formats monétaires sont bien conformes à ceux que nous connaissons en France à savoir "0,00€".
Malheureusement à la ré-ouverture de ce fichier, les formats ont changés et ont désormais du type "€ 0,00".
En modifiant manuellement la case où le format est présent, celui-ci se change en type "français".
Je me posais la question si il n'y avais pas des options dans les Activeworkbook.save pour garder la region en mémoire ou s'il y avait des méthodes que je ne connaissais pas pour remédier à ce problème.

Merci de votre aide !
Jekriss

[NEC14]

Bonjour,

Il y avait un truc comme ça qui fonctionnait, mais je ne sais pas si cela est toujours d'actualité.

Formater la cellule A1 en Standard Euros.

Code :

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

1
2
3
4
5
 
'Avec XL97
Sub Formate()
Range("A1").NumberFormat = "Standard ""Euros"""
End Sub

Code :

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

1
2
3
4
5
 
'Avec XP
Sub Formate()
Range("A1").NumberFormat = "General ""Euros"""
End Sub

Cordialement