将Access Table导出到.csv文件时如何停止自动广播

时间:2018-08-23 04:18:31

标签: excel vba csv ms-access

我想在Access文件中导出表格。

有一个字符串格式的列,例如“ 01”,“ 02”。

当我使用ExportToCSV函数时,它会自动将其强制转换为我不期望的整数(“ 01”-> 1)。

我试图通过将列重新设置为String来解决该问题,但是它不起作用。因此,我想知道如何使用格式规范导出表。

Public Sub ExportTables()
    Call ChangeToText("Coverage No")
    Call ChangeToInt("MY")
    Call ChangeToInt("MM")
    Call ChangeToInt("MD")
    Call ChangeToInt("Record Count")


    ' Export the Mortality table for DCS input
    Dim UserInput As String
    UserInput = CurrentProject.Path & "\DCS Capsil Expected Mortality_testing(2).csv"
    DoCmd.TransferText acExportDelim, , "DCS Capsil Expected Mortality", UserInput
    DoCmd.SetWarnings True
    MsgBox "Done!"
End Sub

1 个答案:

答案 0 :(得分:0)

创建一个查询,该查询使用

这样的表达式来计算2位数字的格式值
Format([MyField], "00")

在导出该查询时,它将被解释为文本,并且默认情况下,文本包含在文本限定符中。尽管Excel将再次显示1而不是01,但是csv文件将包含"01"(包含在文本限定符中),因此目标软件可以使用它。