Discussion :

[db48752b]

Bonjour

Je voudrais exporter le resultat d'une requete avec une macro en fichier.CSV "dans mon dossier mes documents" avec ";" comme séparation
j'ai ACCESS 2002

Merci d'avance pour votre aide

[Frank]

Bonsoir,

s'il s'agit d'une opération "one shot", vous pouvez aussi procéder à cette export en cliquant droit sur la requête, choisir Exporter et suivre tout simplement l'assistant.

Sinon, cet exemple de la FAQ Access doit pouvoir te servir.

[db48752b]

je ne comprend pas
Où dois je Ajouter dans le code : "Local:=True"

Merci d'avance pour votre aide

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
 
Depuis Excel 2002, l'export en CSV via VBA prend par défaut une virgule. (Sauf si on le fait à la main: Fichier/Enregistrer sous/ CSV (séparateur point-virgule)) Pour forcer Excel ou Access à utiliser un point-virgule lors de l'export d'un fichier Excel vers CSV, il faut : 
 
 
Vérifier dans les Options Régionales (Panneau de configuration de Windows), onglets Nombres, si le séparateur de liste est bien un point-virgule. 
Ajouter ceci dans le code : Local:=True pour forcer Excel à utiliser le séparateur configuré sur l'ordinateur utilisé. 
Soit : 
 
appXl.ActiveWorkbook.SaveAs Filename:= _
        "D:\MonFichier.csv", FileFormat:=xlCSV, _
        CreateBackup:=False, Local:=True
 
 
 
Et là on a bien des points-virgules comme séparateurs dans le fichier CSV.