Enregistrement en mode tabulation par une macro

[lulu69000]

Bonsoir à tous,

Je reviens vers vous car je voudrai transformer un fichier xlsx en format tab par une macro mais quand je l'execute les prix en virgule se transforme avec des points
Que puis je mettre dans la macro pour que mes chiffres restent toujours avec une virgule

Bonne soirée
lulu

 

[Gelinotte]

Re : Enregistrement en mode tabulation par une macro

Bonjour,

Dans la macro, change :

FileFormat:=xlText, CreateBackup:=False
pour
FileFormat:=xlUnicodeText, CreateBackup:=False

Les vigules seront respectées.

G

 

[lulu69000]

Re : Enregistrement en mode tabulation par une macro

Bonsoir Gelinotte,
Après avoir changé le xlText par xlUnicodeText j'ai toujours des points !!
Merci pour ton aide
lulu

 

[Gelinotte]

Re : Enregistrement en mode tabulation par une macro

Bonsoir,

Voici ce qui m'a trompé : la macro enregistre le fichier essai A.xlsx en essai A.txt.

essai a.txt reste à l'écran. Si on ferme essai a.txt, le système demande si on veut enregistrer. On accepte.

Là, le fichier essai a.txt a des virgules. Mais si on automatise la fermeture avec une macro ... le fichier essai a.txt aura des points.

Je ne comprends pas le phénomène.

Je cherche.

G

 

[Mytå]

Re : Enregistrement en mode tabulation par une macro

Salut le forum

Essaye en ajoutant le paramètre - Local:=True

    ActiveWorkbook.SaveAs _
            Filename:="C:\Users\Eric\Desktop\essai A.txt", _
            FileFormat:=xlText, _
            CreateBackup:=False, _
            Local:=True

Tiré de l'aide sur SaveAS
Local :
Argument de type Variant facultatif. La valeur True enregistre les fichiers en fonction
de la langue de Microsoft Excel (y compris les paramètres du Panneau de configuration).
La valeur False (valeur par défaut) enregistre les fichiers en fonction de la langue de
Visual Basic pour Applications (VBA) (qui est généralement l'anglais des États-Unis)

Mytå

 

[Gelinotte]

Re : Enregistrement en mode tabulation par une macro

Bonsoir,

Effectivement Mytå, Local:=True fonctionne bien. Il faut seulement faire attention que le L de Local soit bien en majuscule.

J'ai ajouté le fermeture automatique du fichier .txt de façon à ne garder que le .xlsm

ActiveWorkbook.SaveAs _
             Filename:="C:\Users\Eric\Desktop\essai A.txt", _
             FileFormat:=xlText, _
             CreateBackup:=False, _
             Local:=True
ActiveWorkbook.Close False

Merci


G

 

[lulu69000]

Re : Enregistrement en mode tabulation par une macro

Bonjour a tous
et un grand merci pour myta et Gelinotte cela fonctionne parfaitement
Bonne journée
lulu