如何快速合并单个excel表中的多个sheet的工作页

很多朋友会遇到这样的问题,就是很有很多页的数据,少的有几十页,多的可能有几百页,然后需要合并到一个页面做数据分析,如果一页页的复制粘贴的话,就比较麻烦。下面我就介绍一种利用excel的宏计算来解决这个问题。

工具/原料

    excel数据

    microsoft office

方法/步骤

    1

    首先我们要有自己的excel数据,并且我们需要的是microsoft excel,WPS没有这些负责的功能。比如我下面举例的,我自己有205页的数据需要合并,如图所示。

    如何快速合并单个excel表中的多个sheet的工作页

    2

    看到这么多数据页要合并,如果是复制粘贴的话,工作量就很大了。我们现在开始合并,首先要在最前页新建一个工作表。如图:

    如何快速合并单个excel表中的多个sheet的工作页

    3

    在新建的sheet表中“右键”,找到“查看代码”,然后看到宏计算界面。如图所示:

    如何快速合并单个excel表中的多个sheet的工作页如何快速合并单个excel表中的多个sheet的工作页

    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 If

    Next

    Range("B1").Select

    Application.ScreenUpdating = True

    MsgBox "当前工作簿下的全部工作表已经合并完毕!", vbInformation, "提示"

    End Sub

    如何快速合并单个excel表中的多个sheet的工作页

    5

    做完上面的事情,然后只需要点击工具栏上面的“运行”下的“运行子过程/用户窗体”就可以了,合并完之后会有提示。提示完成之后就可以把宏计算界面关闭了。如图所示:

    如何快速合并单个excel表中的多个sheet的工作页

    6

    合并后的效果如下图,我们看到的是合并之后有8000多行,就是205页合并后的结果。谢谢。如有疑问,请留言。

    如何快速合并单个excel表中的多个sheet的工作页如何快速合并单个excel表中的多个sheet的工作页END

注意事项

    现在很多人用的WPS无法实现这个计算,只有功能健全的microsoft excel可以。

温馨提示:经验内容仅供参考,如果您需解决具体问题(尤其法律、医学等领域),建议您详细咨询相关领域专业人士。
免责声明:本文转载来之互联网,不代表本网站的观点和立场。如果你觉得好欢迎分享此网址给你的朋友。
转载请注明出处:https://www.i7q8.com/zhichang/8085.html

打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023年07月28日
下一篇 2023年07月28日
single-end

热门百科

single-end

相关推荐

  • excel如何设置下拉菜单

    excel如何设置下拉菜单,下拉菜单在excel文件中还是很常用的,主要是为了方便我们选择指定的固定数据...

    2024年03月28日
    0℃
  • Excel如何关闭VB功能

    Excel如何关闭VB功能,Excel如何关闭VB功能,小编通过整理相关技巧,将带大家一起看下怎样去进行操作,希望小编的介绍能帮助到你!...

    2024年03月21日
    0℃
  • excel怎样批量复制粘贴

    excel怎样批量复制粘贴,excel是没有办法一次性复制粘贴不相邻的行或不相邻的列的区域的,只能一次性的复制粘贴相邻的行和列,要想复制不相邻的的行和列必须分多次复制黏贴,那有没有能够一次性复制粘贴多个不相邻的行和列呢?方方格子有办法办到,现在就来简单学习下吧!...

    2024年02月28日
    0℃
  • 透视表excel透视表怎么做

    透视表excel透视表怎么做,excel一般通过插入中的数据透视表实现数据透视,需要七个步骤实现,Widow系统电脑和Mac系统电脑操作一致,本答案通过Widow电脑进行演示操作,下面是具体操作介绍:...

    2024年02月19日
    0℃
  • excel如何实现自动增减序号

    excel如何实现自动增减序号,excel如何实现自动增减序号,下面简单操作一下。...

    2024年01月15日
    0℃
关注微信