扫码参与新品0元试用
晒单、顶楼豪礼等你拿
EXCEL如何将两个或多个工作表合并成一个工作表?
回答数
6
浏览数
5,582
方法/步骤
打开一个Excel文档,显示有三个Sheet
1.
三个Sheet分别的内容
2.
点击Sheet栏后面的【+】
3.
创建一个叫“合并”的Sheet
4.
右键“合并”Sheet选择【查看代码】
5.
打开VBA编辑窗口
6.
输入以下代码:Sub合并当前工作簿下的所有工作表()Application.ScreenUpdating=FalseForj=1ToSheets.CountIfSheets(j).NameActiveSheet.NameThenX=Range(A65536).End(xlUp).Row+1Sheets(j).UsedRange.CopyCells(X,1)EndIfNextRange(B1).SelectApplication.ScreenUpdating=TrueMsgBox当前工作簿下的全部工作表已经合并完毕!,vbInformation,提示EndSub
7.
点击【运行】选择【运行子过程/用户窗体】
8.
弹提示窗口
9.
回到“合并”Sheet就能看见成功合并
扫码参与新品0元试用
晒单、顶楼豪礼等你拿