export table access ver txt

bonjour,
je cherche a exporter une table acces vers un fichier txt.
il faudrait que les champs soit separé par des ";".
j'ai essayé avec 2 propriete:
DoCmd.OutputTo acOutputTable, "tbComparePTIPGT", acFormatTXT, ThisWorkbook.Path & "\Echange_PtiPgt_exploitable.txt", True
message impossible d'executer l'action

DoCmd.TransferText acExportFixed, , "tbComparePTIPGT", ThisWorkbook.Path & "\Echange_PtiPgt.txt", True
impossible de trouver le fichier pourtant ca n'a pas planté
pouvez vous m'aider svp
Merci

Essaie de tester si ton fichier existe avant d'exporter si ce n'est pas le cas il faut le créer (il faut importer la référence Microsoft Scripting Runtime):

Dim fso As FileSystemObject
Dim fic As String

fic = chemin de ton fihier
entier = FreeFile
            If Dir(fic, vbNormal) = "" Then
                Set fso = CreateObject("Scripting.FileSystemObject")
                fso.CreateTextFile fic
                Set fso = Nothing
            End If