同一工作簿中多个工作表数据批量处理

在工作中经常会遇到一个工作簿内包含多个相同格式、相同布局的数据区域,最后需要对每个工作表进行求和操作。手工挨个点击显然是不可取的,下面介绍一种方便快捷的方法。

操作方法

  • 01

    检查EXCEL数据区域,确保每个工作表格式、数据分布位置一致。如果分布不一致要对数据位置进行调整。

  • 02

    将文件另存为xlsm格式。 这是因为本操作需要用到VBA函数,xls、xlsx等格式无法保存VBA函数。

  • 03

    打开上一步保存的xlsm文件,观察工具栏是否有”开发工具“,如果没有要在EXCEL选项中勾选。

  • 04

    回到EXCEL主界面,点击”开发工具“下的Visual Basic选项进入代码编写界面。 也可以使用ALT和F11快捷方式直接调出代码编写界面。

  • 05

    输入如下代码: Option Explicit Sub test() Dim w1 As Worksheet Dim i, j, s For i = 1 To Worksheets.Count Set w1 = Worksheets(i) s = 0 For  j = 2 To 10 s = s + w1.Cells(j, 2) Next  j w1.Cells(2, 3) = s Next i End Sub 这段代码套用了两个FOR循环语句,小循环是对某一个工作表进行汇总,大循环是逐个处理工作簿中的所有工作表。

  • 06

    保存代码,回到主页面。在开发工具中点击插入窗体控件,并将宏指定为第5步保存的代码。

  • 07

    可以根据需要决定是否需要更改窗体控件名称。 此处修改为“汇总”。

  • 08

    点击“汇总”按钮,可以看到结果自动填充到了每个工作表的C2单元格中。

(0)

相关推荐

  • excel工作簿中多个工作表数据相加汇总到总表

    一个工作簿中多个工作表跨表之间的求和汇总 操作方法 01 选中汇总表中第一个需要汇总的单元格,按 ALT+=两个键组合. 02 选择范例中的一月份销售额工作表,点击我们核算的第一位销售额数据. 03 ...

  • excel如何一次性打印工作簿中的所有工作表

    excel如何一次性打印工作簿中的所有工作表呢?今天小编分享下自己的方法,希望能够帮助到有需要的小伙伴. 操作方法 01 在电脑里面找到需要打印的表格,见下图 02 打开需要打印的表格会发现工作簿里面 ...

  • Excel2007-如何在不同的工作簿中移动复制工作表

    几分钟网教你Excel教程之如何在不同的工作簿中移动复制工作表. 步骤/方法 01 同时打开你要移动的工作表和要移动到的工作簿 然后点选这个工作表选项卡,单击右键,在右键菜单中选择[移动或复制工作表] ...

  • Excel2007-如何在同一工作簿中移动复制工作表

    几分钟网教你Excel教程之如何在同一工作簿中移动复制工作表. 步骤/方法 01 点选一个工作表选项卡,然后单击右键,在弹出的右键菜单中选择[移动或复制工作表]命令. 02 在弹出的[移动或复制工作表 ...

  • 如何批量打印电脑excel内同一工作簿中的不同工作表文件

    当我们在使用电脑的时候,可以通过excel软件来数据表格数据,如果想要批量打印一个工作簿内的不同工作表的话,应如何操作呢?接下来就由小编来告诉大家.具体如下:1. 第一步,打开电脑中的excel软件. ...

  • 如何将工作簿中的一个工作表单独保存出来

    工作簿中有许多工作表,有时候需要将其中的一个发给他人,这就需要把这个工作表单独保存为一个工作簿.有种方法是:保存一个副本删除其他的工作表,本文将介绍另一种方法. 操作方法 01 本文以分离出工作簿中的 ...

  • excel2010中怎么修改工作簿的默认包含工作表的数目

    如果想要对excel工作簿中的默认工作表数目进行修改时该怎么办呢?接下来就由小编来告诉大家.具体如下:1.第一步,打开电脑并在桌面上找到excel图标,点击打开.2.第二步,进入主页后在上方菜单栏中找 ...

  • Excel中如何并排显示一个工作簿中的两个工作表

    我们在使用Excel时总会遇到各种各样的难题,如果我们懂得知识越多,我们解决问题起来就越方便啦,总之我们要有这个观念:大量重复的工作一定要想简便方法.例如下面这个问题. 操作方法 01 在使用exce ...

  • 该工作簿中含有一种既无法被禁用的宏..解决方法

    操作方法 01 这个错误的完整提示是 [打开excel时,出现一个提示框:一个黄感叹号:该工作簿中含有一种既无法被禁用又无法被签署的宏(Microsoft Excel 4.0版本宏).因此,该工作簿无 ...