使用宏将excel工作表保存到带有文件名的CSV文件 [英] Saving excel worksheet to CSV with file name from a cell using a macro

问题描述

我有一个宏，保存我的工作簿的副本，工作，但它保存为.xlsm
，我需要保存为逗号分隔的.csv文件类型
任何一个帮助

$ b

  Dim newWB As Variant 
 Dim wb1 As Workbook 
设置wb1 = ActiveWorkbook 
使用wb1 
 .SaveCopyAs（C：\Users\sales\desktop\）&范围（A2）。 .xlsm
以
结束
结束Sub 
  

解决方案

代码：

  .SaveAs文件名： C：\Users\sales\desktop\）&范围（A2）。 .csv，_ 
 FileFormat =：xlCSV 
  

i have a macro that saves a copy of my workbook that works but it saves as a .xlsm and i need it to be saved as a comma delimited .csv file type can any one help me?

here is the macro i have now

Sub toCSV()

Dim newWB As Variant
Dim wb1 As Workbook
Set wb1 = ActiveWorkbook
With wb1
    .SaveCopyAs ("C:\Users\sales\desktop\") & Range("A2").Text & ".xlsm"
End With

End Sub

解决方案

Code:

.SaveAs Filename:=("C:\Users\sales\desktop\") & Range("A2").Text & ".csv", _
FileFormat=:xlCSV

这篇关于使用宏将excel工作表保存到带有文件名的CSV文件的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！