export kwerendy do pliku csv

Article View: pl.comp.bazy-danych.msaccess

Article #137305

Back to pl.comp.bazy-danych.msaccess Previous Next

#137305

From: Jan Koc
Date: Mon, 21 Nov 2016 11:31

31 lines
2334 bytes

Witam
Od pewnego czasu boksuję się z wyeksportowaniem kwerendy "ExportDoDPD" do pliku csv (skoroszyt excela z polami rozdzielonymi średnikami)
próbowałem bezpośrednio 

Specyfikacja exportu "Export11" do pliku tekstowego .csv

DoCmd.TransferText acExportDelim, "Export11", "ExportDoDPD", "X:\Export_DPD.csv", True

albo najpierw wysyłam plik excelowski a potem go zamieniam na csv

Dim WrksheetName As String
Dim xl As Object
Set xl = CreateObject("Excel.Application")

xl.Workbooks.Open "X:\Export_DPD.xls"
DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel97, "ExportDoDPD", "X:\Export_DPD.xls", True

'Set xl = Nothing

' Dim AJ As String
' Dim AB As String
'       AJ = "X:\Export_DPD.xls"
'       AB = "X:\Export_DPD.csv"
'      fSaveAsXlsx AJ, AB

i za każdym razem dostaję plik który jest nieczytany przez aplikację zawnętrzną. 
Dopiero jak otworzę plik i polecę zapis, EXCEL poda komunikat, że zostaną utracone formuły a ja się na to zgodzę, to plik jest akceptowany.

Czy ktoś ma jakiś pomysł ?

Z góry dziękuję

Technical Details

Message-ID: <39d994b6-e28e-4fc2-a084-f06f776fd643@googlegroups.com>

Path:

mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!agh.edu.pl!news.agh.edu.pl!newsfeed2.atman.pl!newsfeed.atman.pl!goblin3!goblin1!goblin2!goblin.stu.neva.ru!newsfeed.xs4all.nl!newsfeed8.news.xs4all.nl!newspeer1.nac.net!border2.nntp.dca1.giganews.com!nntp.giganews.com!o1no1346606ito.0!news-out.google.com!k2ni2821itb.0!nntp.google.com!o1no1346600ito.0!postnews.google.com!glegroupsg2000goo.googlegroups.com!not-for-mail

Show Full Headers

Complete Article Headers

X-Received: by 10.99.53.5 with SMTP id c5mr5030115pga.127.1479727876963;        Mon, 21 Nov 2016 03:31:16 -0800 (PST)
X-Received: by 10.157.60.235 with SMTP id t40mr737749otf.0.1479727876920; Mon, 21 Nov 2016 03:31:16 -0800 (PST)
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!agh.edu.pl!news.agh.edu.pl!newsfeed2.atman.pl!newsfeed.atman.pl!goblin3!goblin1!goblin2!goblin.stu.neva.ru!newsfeed.xs4all.nl!newsfeed8.news.xs4all.nl!newspeer1.nac.net!border2.nntp.dca1.giganews.com!nntp.giganews.com!o1no1346606ito.0!news-out.google.com!k2ni2821itb.0!nntp.google.com!o1no1346600ito.0!postnews.google.com!glegroupsg2000goo.googlegroups.com!not-for-mail
Newsgroups: pl.comp.bazy-danych.msaccess
Date: Mon, 21 Nov 2016 03:31:16 -0800 (PST)
Complaints-To: groups-abuse@google.com
Injection-Info: glegroupsg2000goo.googlegroups.com; posting-host=37.47.171.252; posting-account=PWJ4IAoAAAAF14TuSAASrVsGQI86DsCf
NNTP-Posting-Host: 37.47.171.252
User-Agent: G2/1.0
MIME-Version: 1.0
Message-ID: <39d994b6-e28e-4fc2-a084-f06f776fd643@googlegroups.com>
Subject: export kwerendy do pliku csv
From: Jan Koc <jan.kociumbas@gmail.com>
Injection-Date: Mon, 21 Nov 2016 11:31:16 +0000
Lines: 37
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit