[Problème Maro VBA] Exporter une colonne en fichier Texte

Bonjour à tous je suis nouveau ici ,

je réalise un fichier qui exporte du texte , j'ai une macro qui fonctionne sauf que lorqu'il y à un " sur le mot mon code en ajoute 3.

Je ne sais pas comment m'y prendre pour éviter cela.

Exemple normalement je devrait avoir cela qui est extrait dans mon fichier texte :

"41123123

et j'ai cela ! ==> """41123123"

Voici mon code :

Sub Export_E()

Application.ScreenUpdating = False

Columns("A:A").Select

Selection.Copy

Workbooks.Add

Columns("A:A").Select

Selection.PasteSpecial Paste:=xlPasteValues

'ActiveSheet.Range(AB).PasteSpecial Paste:=xlPasteValues

'.PasteSpecial Paste:=xlPasteValuesAndNumberFormats

Application.CutCopyMode = False

ChDir "D:\"

ActiveWorkbook.SaveAs fileName:="D:\testvba\txt.mac", _

FileFormat:=xlUnicodeText, CreateBackup:=False

ActiveWorkbook.Close SaveChanges:=False

Application.ScreenUpdating = True

End Sub

C'est normal...

si tu as 41433

Tu auras "41433"

Si tu as "41433

Il faudra que VBA double ton truc pour montere que c'est une string

Solution, avant d'exporter dans ton texte, replacer tes " par des *$,!jjr* avec Replace(TestString, """", "*$,!jjr*")

Il te suffira par la suite de faire le cheminement inverse lors de l'import avec Replace(TestString, "*$,!jjr*", """")

Salut et merci pour ta réponse , tu n'aurais pas un exemple avec cette macro car j'ai toujours une erreur de syntaxe avec :

Replace(TestString, """" .