1、很多时候，我们想将EXCEL多个标签页的内容合并在一个标签页中，如果标签页过多，又不想手工复制的话，可以采用自定义宏的方法
4、看到宏计算界面，我们就只需要把下面的代码复制进去，代码如下，效果如下：Sub 合并工作表猾诮沓靥()Application.ScreenUpdating = False'For 枣娣空郅j = 1 To Sheets.Count If Sheets(j).Name <> ActiveSheet.Name Then X = Range("A65536").End(xlUp).Row + 1 Sheets(j).UsedRange.Copy Cells(X, 1) End IfNext'Range("B1").SelectApplication.ScreenUpdating = TrueMsgBox "当前工作簿下的工作表已经合并完毕！", vbInformation, "提示"End Sub
