摘要: '------------------------------------------- '获取某文件夹下所有文件和子目录下的文件 '------------------------------------------- Sub getAllFile() Cells.ClearContents Call getFileNm(ChooseFolder(), 0, 0) MsgBox "处理完... 阅读全文
posted @ 2016-06-28 18:15 然爸笔记 阅读(9540) 评论(0) 推荐(0) 编辑