随便打开一个Excel文件,按快捷键:Alt+f11打开VBA窗口; 插入--》模块,打开模块编辑窗口; 将如下代码复制到新建模块窗口中,并使用快捷键F5运行; '功能:把多个excel工作簿的第一个sheet工作表合并到一个excel工作簿的多个sheet工作表,新工作表的名称等于原工作簿的名称 Sub Books2Sheets() '定义对话框变量 Dim fdAs...