2018年5月11日
Word VBA(批量复制Excel表格和Word表格到Word中)
摘要： unction Test() '使用双字典 SearchPath = FolderDialog("请选择文件夹") If SearchPath = "" Then Exit Function End If WordName = SplitPath(CStr(SearchPath), 1) Dim sFile ... 阅读全文
posted @ 2018-05-11 11:01 月之圣痕 阅读(6766) 评论(0) 推荐(0) 编辑