首页 > 解决方案 > 将多张工作表导出为一个csv文件excel vba

问题描述

我有 10 张工作表的 excel 工作簿,我想将每张工作表中的范围“B17:H28”导出到一个 csv 文件中,而不是多个 csv 文件。我有将每个工作表的范围导出到多个 csv 文件中的代码。

For Each sh In ActiveWorkbook.Sheets
Set rngtemp = Sheet.Range("B17:H28")
rngtemp.Copy
csvfilenametemp= ....
Set wbtemp = Application.Workbooks.Add(1)
With wbtemp
.Sheets(1).Range("A1").PasteSpecial xlPasteValues
.SaveAs Filename:=csvfilenametemp, FileFormat:=xlCSV, CreateBackup:=False
.Close
End With

标签: excelvba

解决方案


您可以通过以下方式将多个 csv 文件合并为一个文件

  1. 打开命令提示符
  2. 转到您的文件的存储位置cd "C/..."
  3. 类型copy *.csv to output.csv
  4. 按运行并检查您的目录

推荐阅读