2023年9月11日
VBA批量创建文件夹
摘要： Sub createFolder() Dim wks As Worksheet On Error Resume Next Set wks = ThisWorkbook.Worksheets(1) basepath = ThisWorkbook.Path & "\" Max = wks.Range(" 阅读全文
posted @ 2023-09-11 16:08 tec2019 阅读(109) 评论(0) 推荐(0) 编辑