Enregistrement Excel en TXT avec caractères spéciaux

Bonjour à tous !

Je me permets de poster ce message sur ce forum, car après de nombreuses recherches, je n'ai pas réussi à trouver mon bonheur...

J'ai un soucis d'enregistrement d'un fichier Excel (2007) en format TXT. J'ai besoin d'avoir un format TXT (ASCII en réalité) pour pouvoir utiliser le dit-fichier dans un autre logiciel.

Le problème vient que cette feuille Excel (jointe à ce message) contient des caractères spéciaux (" en l'occurrence), dans les cellules de la ligne 5. Or, lorsque je sauvegarde cette feuille en TXT (séparateur : tabulation), les (") se transforment en ("""). Et il me faut uniquement des (") simples pour que le logiciel qui utilise le TXT puisse fonctionner.

J'ai essayé en supprimant les (") dans le cellules de la ligne 5, mais il n'apparaisse plus ensuite dans le TXT. En résumé, des ("), j'en ai soit trop, soit pas assez !

Quelqu'un a-t-il déjà été confronté à ce problème ?

Merci de votre retour !

PS : j'ai également joint le fichier TXT exporté, avec le problème des (""")...

up !

Bonjour,

Tu peux utiliser cette macro (plage et nom du fichier à adapter)

dans cet exemple le fichier cible s'appelle "galopin.txt"

Sub Export()
Dim Plage As Object, oL As Object, oC As Object, FileN$, Sep$, Tmp$
FileN = "galopin"
Sep = Chr(9)  'séparateur tabulation 
With Worksheets(1)
    Set Plage = .Range("A1:F16")
End With
Open FileN & ".txt" For Output As #1
    For Each oL In Plage.Rows
        Tmp = ""
        For Each oC In oL.Cells
            Tmp = Tmp & CStr(oC.Text) & Sep
        Next
        Print #1, Tmp
    Next
Close
End Sub

Voir aussi fichier joint;

A+

Merci beaucoup !

Ça marche nickel !

Utiliser le "print", c'est une bonne astuce que je retiendrai !

A plus !