Microsoft 365 中文网 > Excel > Excel拆分表格内容拆分为多个 Excel工作表拆分代码

Excel拆分表格内容拆分为多个 Excel工作表拆分代码

发布时间:2023-06-12 09: 53: 36

品牌型号:戴尔

系统: Windows 11

软件版本:Microsoft 365

Excel是一款强大的办公软件,可以用来处理各种数据和信息。有时候,我们需要对一个大的表格进行拆分,把其中的内容按照一定的规则分割成多个工作表或工作簿。这样可以方便我们对数据进行分类、筛选、统计等操作。那么,如何用Excel实现这样的功能呢?本文将为大家介绍Excel拆分表格内容拆分为多个的方法,Excel工作表拆分代码。

一、Excel拆分表格内容拆分为多个

如果我们想要把一个表格中的内容按照某一列或某几列的值进行拆分,可以使用Excel自带的“高级筛选”功能。具体操作步骤如下:

1. 打开需要拆分的表格,选中要拆分的数据区域,点击“数据”菜单栏中的“高级”按钮。

高级
图1:高级

2. 在弹出的对话框中,选择“将筛选结果复制到其他位置”,在“列表区域”框中输入或选择要拆分的数据区域,在“条件区域”框中输入或选择要按照哪些列进行拆分,在“复制到”框中输入或选择要将筛选结果复制到哪个位置。

筛选
图2:筛选

3. 点击“确定”按钮,可以看到筛选结果被复制到了指定的位置。

4. 重复上述步骤,根据不同的条件进行筛选,可以实现对表格内容的拆分。

二、Excel工作表拆分代码

如果我们想要把一个工作簿中的多个工作表按照工作表名称进行拆分,保存为多个单独的工作簿,可以使用VBA代码来实现。具体操作步骤如下:

1. 打开需要拆分的工作簿,按Alt+F11键进入VBA编辑器窗口。

2. 在左侧的项目资源管理器中,右键点击“Microsoft Excel对象”,选择“插入”-“模块”。

插入模块
图3:插入模块

3. 在右侧的代码窗口中输入以下代码:

Sub 拆分工作表()

Dim ws As Worksheet

Dim wb As Workbook

For Each ws In ThisWorkbook.Worksheets

Set wb = Workbooks.Add

ws.Copy Before:=wb.Worksheets(1)

wb.SaveAs ThisWorkbook.Path & "\" & ws.Name & ".xlsx"

wb.Close False

Next ws

End Sub

VBA代码
图4:VBA代码

3.点击运行按钮或按F5键执行代码,就可以看到当前工作簿中的每个工作表都被保存为了一个单独的工作簿,文件名与工作表名称相同。

拆分工作表
图5:拆分工作表

三、总结

本文介绍了两种Excel拆分表格内容拆分为多个,Excel工作表拆分代码的方法,一种是使用Excel自带的“高级筛选”功能,另一种是使用VBA代码。这两种方法都有各自的优缺点,可以根据实际情况和需求进行选择和使用。希望本文能够对你有所帮助。

展开阅读全文

标签:

读者也访问过这里:
AI人工智能启蒙课
送30款AI工具!免费试听!
立即学习
思维导图Xmind
助你理清思路,捕捉创意。
立即购买
热门文章
ppt图片设置透明度有几种方法 ppt图片设置透明度怎么弄
ppt是我们在日常工作汇报、年终总结时常用到的办公软件。为了使ppt看起来更加完美,我们有时会将ppt中的图片进行透明度设置,但有部分朋友不知道该如何进行操作,今天这篇文章就主要给大家介绍ppt图片设置透明度有几种方法,ppt图片设置透明度怎么弄的相关操作步骤,有需要的朋友可以详细参考本文详细内容。
2022-12-12
Excel错误提示您输入的内容不符合限制条件 Excel怎么解除限制输入内容
Excel是一款常用的办公软件,它可以帮助我们进行数据的录入、分析和处理。但是,有时候我们在使用Excel的时候,会遇到一些错误提示,比如“您输入的内容不符合限制条件”。这种情况下,我们应该怎么办呢?本文将为你介绍Excel错误提示您输入的内容不符合限制条件的原因和解决方法,以及Excel怎么解除限制输入内容的操作步骤。
2023-06-29
excelif函数怎么用多个条件 excelif函数大于等于并且小于怎么输入
excel表格中有许多不同功能的函数和公式,如求和、求积、求均数、筛选数据等等。今天,我们就来讲讲如何使用excel中的if函数,以及使用if函数过程中需要注意的一些操作技巧和方式,主要内容包括“excelif函数怎么用多个条件,excelif函数大于等于并且小于怎么输入”这两个问题。
2022-12-01
word更新目录后格式变了怎么办 word更新目录为什么有的没有显示
word自动生成目录和更新目录功能大家在写论文的时候应该都体会到了它的好用之处,但是有的小伙伴反应word更新目录后格式会变化,还有的时候更新了目录却没有显示,遇到这种情况该怎么办呢?
2022-11-30
word整页复制到另一文档 word整页复制格式不变
我们使用Word文档时,有时需要将一个Word文档中的内容整页复制到另一个文档中。通常我们会使用Ctrl+C,Ctrl+V进行复制粘贴,但是如果要将多个Word文档复制到一个文档中,这样操作起来就会降低工作效率。
2022-12-01
word打字不显示字了什么原因 word里面打字不显示是怎么回事
很多对Word文档不熟悉的朋友在使用Word过程中总会有这样那样的问题,比如打字不显示汉字甚至打字不显示等等。那么Word打字不显示字了是什么原因?Word里面打字不显示是怎么回事呢?
2022-12-01
最新资讯
Excel打开乱码是什么原因 Excel打开乱码如何解决
Excel是一款由微软公司开发的电子表格软件,用于数据处理、分析、计算和展示。在工作中,打开需要处理的Excel文件时可能会出现乱码的情况,导致我们不能及时进行数据处理。本文将为大家介绍Excel打开乱码是什么原因以及Excel打开乱码如何解决。
2024-07-03
Word试卷排版怎么排 Word试卷密封线怎么做
老师们在出试卷的时候一般都会使用Word来编排,好的排版能让卷面整洁方便阅卷和打分。那么用Word怎么给试卷排版呢?今天的文章就来给大家介绍Word试卷排版怎么排,Word试卷密封线怎么做。
2024-07-03
Excel预测数据用的什么方法 Excel预测准确度怎么算
Excel在工作学习中起着不可或缺的作用,Excel不仅仅是简单的为我们记录数据,它更是处理和分析数据的高效工具。例如在Excel表格中的“预测工具表”命令,能够对数据的变化进行预测。那么这个命令该怎么使用呢?今天的文章就来带大家学习Excel预测数据用的什么方法,Excel预测准确度怎么算。
2024-07-03
Word字体不一样怎么刷 Word格式刷改不了字体
Word是Microsoft 365办公套件中的一部分。提供了丰富的文字处理功能,可以用于创建、编辑、格式化和打印各种类型的文档。在日常工作中,当需要将多个文档合并为一个文档时,各个文档可能使用了不同的字体,此时需要统一字体格式。那么,如何统一呢?下面将为大家介绍Word字体不一样怎么刷以及Word格式刷改不了字体该怎么办。
2024-06-04
Excel竖列自动变成横列 Excel怎么把一竖列分成2竖列
有些数据分析新手在使用Excel过程中遇到一些操作问题,今天我将给大家介绍Excel竖列自动变成横列,Excel怎么把一竖列分成2竖列的具体操作步骤,以便大家更加熟练地操作Microsoft 365。
2024-06-04
Excel计算年龄函数公式 Excel计算年龄公式显示不对
许多人在使用Microsoft 365的过程中,会在使用Excel过程中遇到一些具体操作的问题,比如Excel计算年龄函数公式等方面的问题,今天我将给大家介绍Excel计算年龄函数公式,Excel计算年龄公式显示不对的详细内容,以便大家更加熟练地操作Microsoft 365。
2024-06-04

微信公众号

欢迎加入Microsoft 365产品的大家庭,立即扫码关注,获取更多软件动态和资源福利。

读者也喜欢这些内容: