使用 VBA 导出不带货币符号的 csv 访问查询

Question

我正在使用此代码在 CSV 文件中导出查询：

Dim getFolder As Object
Dim sLoc As String
Dim sName As String

sName = Me.Name
Set getFolder = Application.FileDialog(4)
With getFolder
    .AllowMultiSelect = False
    If .Show = True Then
        sLoc = getFolder.SelectedItems(1) & "\"
    End If
End With
     DoCmd.TransferText acExportDelim, "csv", sName & "_Csv", sLoc & sName & ".csv", True

但是，有一个字段是货币格式的，在csv文件中导出这个字段，货币符号在数值前面，例如：

test|||||0|0|0|0|0||€ 123,00

不幸的是，我需要在使用 PrestaShop 的网站中导入它，货币符号会造成麻烦。如何防止符号出现在 CSV 文件中？

Answer 1

在设计视图中打开查询并将该字段的格式更改为标准。

Answer 2

修改您导出到 csv 的查询，使其具有包含以下表达式的字段：

Format([YourCurrencyField], "Standard")

但不确定是否是 "cleaner"。

使用 VBA 导出不带货币符号的 csv 访问查询

Export an access query in csv without currency symbol using VBA

csv

ms-access

vba

ms-access-2013