Text文件操作

Workbooks.OpenText()
载入一个文本文档,并将其作为包含单个工作表的新工作簿进行分列处理。

语法:
表达式.OpenText(Filename,StartRow, DataType, ConsecutiveDelimiter, Tab,Semicolon, Comma, Space, Other, OtherChar,)
Filename:必选
ConsecutiveDelimite:将连续的分隔符视为一个
StartRow:从哪行开始
Other:为True时,将OtherChar中指定的字符用为分隔符。
例:打开一个txt,其从第一行开始,多个分隔符只视为一个,逗号及等号视为分隔符。

Workbooks.OpenText filename:=ThisWorkbook.Path & "\" & filename, StartRow:=1, DataType:=xlDelimited, _
      ConsecutiveDelimiter:=True, Comma:=True, other:=True, otherchar:="="

Excel文件操作

VBA的文件操作主要是对象方法的使用,特别是常用参数的使用,用对了才能达到想要的效果。
Workbook.SaveAs方法
语法:
表达式.SaveAs(Filename, FileFormat)
FileFormat: 51 xlsx; 52 xlsm; 56 xls;
例:将文件另存为 qev.xlsx,

'此处的51若是别的,则会出问题,因为文件名的后缀为.xlsx,所以只能用51才行
ActiveWorkbook.SaveAs filename := "C:\Users\pc\Desktop\qev\qev.xlsx",  FileFormat := 51