Você pode usar a função abaixo
DoCmd.TransferText(TransferType, SpecificationName, TableName, FileName, HasFieldNames, HTMLTableName, CodePage)
com o exemplo
DoCmd.TransferText acExportDelim, "Standard Output", "External Report", C:\Txtfiles\MyText.csv"