使用分號分隔符從VBA / Access導出到CSV

Question

我在受限制的公司網絡上，以編程方式從查詢中導出CSV文件時遇到了一些麻煩。 以下命令：

DoCmd.TransferText acExportDelim, , "query_name", strPath

嘗試導出以逗號[，]作為分隔符的CSV。 由於它等於我所在區域的小數點分隔符，因此將導致錯誤。 在這種情況下，Windows本地化設置可能無法正確應用。 Excel的“另存為...”命令的確提供了帶有[;的正確CSV文件。 ]分隔符。

在這篇文章之后 ，我嘗試創建一個規范（SpecName）以應用分號。 該對話框阻止我取消選中所有框，並且不能保存規范。 我的猜測是這是由於我的帳戶限制所致。

因此，本地設置不能正確應用，並且自定義規范也不可行。 我在這里有什么選擇？

Answer 1

這里有兩種方法：

1. 滾動自己的csv導出。 不太困難。 打開查詢以獲取記錄集，然后使用Do While Not rs.EOF遍歷行，並使用For Each myField In rs.Fields遍歷字段，並將數據連接成字符串。 這樣，如果值內有分隔符，則可以指定自己的分隔符和引號。

2. 創建一個Excel實例，然后使用Worksheet.QueryTables.Add()將記錄集復制到Worksheet.QueryTables.Add() 。 然后，您可以使用Worksheet.SaveAs sCSVName, xlCSVWindows將其寫入csv文件。

Answer 2

由於它等於我所在區域的小數點分隔符，因此將導致錯誤。 在這種情況下，Windows本地化設置可能無法正確應用。 -這是什么錯誤？ 請發布錯誤，以便我們進一步查看和分析。

該對話框阻止我取消選中所有框，並且不能保存規范。 這是什么樣子，您可以張貼屏幕截圖嗎？ 請發布屏幕截圖，以便我們進一步查看和分析。