Sub Macro1()
Cells.Select
ChDir "C:/Documents and Settings/ibmsz/My Documents/0714"
ActiveWorkbook.SaveAs Filename:= _
"C:/Documents and Settings/ibmsz/My Documents/0714/新建 Microsoft Excel 工作表.csv" _
, FileFormat:=xlCSV, CreateBackup:=False
Range("G6").Select
End Sub
Excel 另存为CSV
最新推荐文章于 2022-07-31 20:45:00 发布