将CSV保存到分隔符

从Access我打开一个Excel实例的CSV文件，做一些处理，然后保存该文件。

Sub ImportFile(fp As String) Dim xlApp as Excel.Application Dim wb as Excel.Workbook Set xlApp = New Excel.Application Set wb = xlApp.Workbooks.Open(fp) ' processing code... wb.Save End Sub 

稍后在代码中closures文件，并使用TransferText方法将文件导入到表中。

 DoCmd.TransferText TransferType:=acImportDelim, tableName:=uploadTable, _ fileName:=fp, hasfieldnames:=True 

问题是保存后所有的列已经连接到A列，即分隔符已经丢失。

我已经保存到位wb.Save ，我保存了自己的wb.SaveAs wb.Path & "\" & wb.Name没有区别。

我知道我可以用不同的格式来执行SaveAs，但是这些文件非常大，并且有多个副本，效率不高。 我可以使用FSO删除原来的，但我更喜欢整洁的解决scheme。

任何人都可以解释这个问题是什么？