怎样把多个excel表合并成多个sheet（怎么把多个excel合并成多个sheet）

使用方法：

1、新建一个工作薄，将其命名为你合并后的名字。

2、打开此工作薄。

3、在其下任一个工作表标签上点击右键，选择“查看代码”。

4、在打开的VBA编辑窗口中粘贴以下代码：Sub 工作薄间工作表合并()Dim FileOpenDim X As IntegerApplication.ScreenUpdating = FalseFileOpen = Application.GetOpenFilename(FileFilter:="Microsoft Excel文件(*.xls),*.xls", MultiSelect:=True, Title:="合并工作薄")X = 1While X