摘要: 1 Sub EditCsvToXls() 2 Application.ScreenUpdating = False 3 '文件目录 4 ChDir "C:\Users\QA-Department\Desktop\test" 5 Dim sDir As String 6 Dim curdir As String 7 curdir = "C:\Users\QA-Department\D... 阅读全文
posted @ 2019-01-24 10:25 若青若墨 阅读(433) 评论(0) 推荐(0) 编辑