excel - VBA - 将工作表导出为 CSV 而不在 CSV 中舍入值

Question

我有一个脚本，可以将我的 excel 工作簿中的 sheet3 导出到 CSV。

不幸的是，CSV 现在正在四舍五入我的数值。我已经嵌入了问题的图像以及我正在使用的 VBA 脚本。有没有办法阻止这种情况发生？

保存到csv时数据更改的问题

将工作表 3 保存为 CSV 的 VBA 代码。

Public Sub ExportCSV()

Dim wbkExport As Workbook
Dim shtToExport As Worksheet

Set shtToExport = ThisWorkbook.Worksheets("Sheet3")     'Sheet to export as CSV
Set wbkExport = Application.Workbooks.Add
shtToExport.Copy Before:=wbkExport.Worksheets(wbkExport.Worksheets.Count)
Application.DisplayAlerts = False                       'Possibly overwrite without asking
wbkExport.SaveAs Filename:="\\NJTRDNSV01\X242095$\Desktop\pjw\Output", FileFormat:=xlCSV
Application.DisplayAlerts = True
wbkExport.Close SaveChanges:=False

End Sub

标签： excelvbacsv