摘要: '功能:把多个工作簿的第一个工作表合并到一个工作簿的多个工作表,新工作表的名称等于原工作簿的名称Sub Books2Sheets() '定义对话框变量 Dim fd As FileDialog Set fd = Application.FileDialog(msoFileDialo... 阅读全文
posted @ 2016-01-05 17:46 大旭 阅读(1400) 评论(0) 推荐(0) 编辑