能百科百科问答excel如何将一个工作簿中的多个工作表合并到一张工作表上

excel如何将一个工作簿中的多个工作表合并到一张工作表上

excel如何将一个工作簿中的多个工作表合并到一张工作表上

excel如何将一个工作簿中的多个工作表合并到一张工作表上

打开你的工作簿新建一个工作表在这个工作表的标签上右键查看代码你把下面的代码复制到里边去,然后上面有个运行运行子程序就可以了,代码如下,如果出现问题你可以尝试工具宏宏安全性里把那个降低为中或者低再试试

Sub合并当前工作簿下的所有工作表()

Application.ScreenUpda来自ting=False

Forj=1ToSheets.Count

IfSheets(j).Name***.NameThen

X=Range("A65536").End(止零xlUp).Row+1

Sheets(j).UsedRange.CopyCells(X,1)

钟才打获EndIf

Next

Range("360问答B1").Select

Application.ScreenUpdating哥题=True

MsgBo离露鲁需异液班劳更念x"当前工作簿下的全部工作表轮诗硫卫已经合并完毕!",vbInformation,"提示"

EndSub

本文来自网络,不代表本站立场,转载请注明出处:https://www.3nbk.com/answer/93960.html