当前位置：网站首页 > 技术文章 > 正文

1个Excel文件拆分为100个，我需要2小时，同事2分钟就搞定

zhezhongyun 2025-03-26 19:07 81 浏览

Hello，大家好，今天跟大家分享下我们如何拆分Excel，一共分为2种情况

1.将一个Sheet根据某一个字段拆分为多个Sheet

2.将一个Excel文件中的多个sheet分别拆分为单独的Excel文件

这也是一个粉丝问到的问题，相信很多人在工作中都遇到过类似的问题，下面就让我们来看下解决方法吧

想要从零学习Excel，这里↑↑↑↑

一、拆分Sheet

针对这种情况，建议大家使用透视表来进行表格的拆分，这个操作非常的简单，它最大的优点就是可以实现动态更新，数据源如果发生更改，拆分后的表格是可以实现一键更新的

1.构建拆分字段

所谓的拆分字段，就是我们想要根据那个字段进行sheet拆分，下图是一个2021年的订单数据，现在我们想要根据【月份】将其拆分开，让每一个月占据一个Sheet，这个月份就是拆分字段。表格中没有拆分字段的话就需要构建一个出来

2.插入透视表

拆分字段构建完成后，我们需要按下【Ctrl+T】将普通表转换为超级表，这样的话更改数据源中的数据，分表才能实现自动更新

转换为超级表后，我们直接【插入】功能组，选择【数据透视表】在跳出的界面中直接点击【确定】就会新建一个透视表，在右侧的字段列表中，直接按照顺序勾选字段即可，如果数据源中存在日期会被自动组合，我们只需要点击鼠标右键选择【取消组合】即可

3.设置透视表显示格式

勾选字段后，这个表格的格式是比较杂乱的，我们需要设置一下，在上方点击【设计】

将【分类汇总】设置为【不显示】

将【总计】设置为【对行和列禁用】

将【报表布局】设置为【以表格的形式显示】及【重复所有标签】

这样的话就是一个常见的表格显示样式了

4.拆分表格

格式设置好之后，我们在【行区域】中将【月份】这个字段放在【筛选区域】然后点击【数据透视表分析】在最左侧点击【选项】然后点击【显示报表筛选页】看到一个窗口后直接点击确定，这样的话就会快速将表格按照月份进行拆分。，如果数据源发生改变，只需点击一个表格，在鼠标右键中点击【刷新】就能自动更新过来了

二、拆分Excel文件

拆分Excel文件是将1个Excel文件，根据Sheet名称拆分为多个Excel文件。对于这种情况我们只能使用VBA代码来实现了，首先需要复制下面的代码，然后点击visual basic，进入VBA的编辑界面，然后点击【插入】选择【模块】将代码直接粘贴进去，按下【F5键】来运行程序，运行完毕后会弹出【拆分完毕】的提示，文件会的存放位置与需要拆分的Excel它们的位置是一样的，至此就拆分完毕了

Sub 拆分工作薄()
Dim xpath As String
xpath = ActiveWorkbook.Path
Dim sht As Worksheet
For Each sht In ActiveWorkbook.Sheets
sht.Copy
ActiveWorkbook.SaveAs Filename:=xpath & "\" & sht.Name & ".xlsx"
ActiveWorkbook.Close
Next
MsgBox "拆分完毕！"
End Sub

以上就是今天分享的全部内容，拆分Excel，一般也就是这2种情况，大家直接套用即可

我是Excel从零到一，关注我，持续分享更多Excel技巧

标签

上一篇：批量修改工作表标签名称设置技巧（批量修改工作薄里工作表的名称）
下一篇：威纶通模板(Template)功能的使用说明

1个Excel文件拆分为100个，我需要2小时，同事2分钟就搞定

一、拆分Sheet

二、拆分Excel文件

相关推荐

前端Flex布局可视化布局工具介绍，vue和html5快速设计利器

HTML 简介（html简介及优缺点）

现在页面实时聊天都使用Websocket技术实现吗?

关于HTML5被简称做H5，你怎么看?（html5缩写）

在SpringBoot+Vue3项目中通过Nginx代理WebSocket实现跨域通信

利用webSocket实现消息的实时推送

谈谈websocket跨域

前端开发规范(一、HTML篇)

html5 工业web组态-开发自定义的组件 (炫酷按钮)

Python每日一库之Beautiful Soup（python mtime）