VBA打开文件,编辑,保存

时间:2014-08-26 09:37:23

标签: vba automation save editing

我正在尝试找到解决以下问题的代码:

  • 在一个文件夹中打开几个csv文件
  • 运行格式
  • 将其另存为xlsx文件

我已经到位的格式代码。我只是不知道如何自动打开所有文件,进行格式化并保存它们。

期待您的回答。 最好

1 个答案:

答案 0 :(得分:0)

要打开文件,您可以修改此代码(带扩展名的位置和文件名):

patH = "C:\General\"
filE = "Example.csv"  
Workbooks.Open Filename:=patH & filE

要保存格式化文件,您可以修改下面的代码(如果存在同名文件,则会覆盖):

path2 = "C:\General\"
file2 = "Example2"
dirFile = path2 & file2
ThisWorkBook.SaveAs dirFile, AccessMode:=xlExclusive, _
    ConflictResolution:=Excel.XlSaveConflictResolution.xlLocalSessionChanges