使用宏更改MS Access CSV导出字段分隔符（Visual Basic）

Question

我有访问数据库，我正在尝试将其所有表格导出为 CSV格式，以便我可以将它们导入MySQL数据库。

我对Visual Basic的知识非常有限＆amp;已经设法找到一个宏模块（在网上），它将让我一次导出所有表。

Public Sub exportAllChangeDelim()

Dim obj As AccessObject, dbs As Object

Set dbs = Application.CurrentData
    For Each obj In dbs.AllTables
        If Left(obj.Name, 4) <> "MSys" Then
            DoCmd.TransferText acExportDelim, , obj.Name, obj.Name & ".csv", false
        End If
    Next obj
End Sub

是否有简单方法，我可以在其中更改默认字段分隔符：

“

以自定义为例，例如：

{}

原因我是否在我试图导出的字段内遇到问题，因为它们有时会包含语音标记，这会在导入MySQL时中断字段数。

为冗长的问题道歉！