拆分Excel,不要再复制粘贴了,分享2种方法点点鼠标就搞定

2024-06-22 0

大家好,有粉丝问到Excel分区的问题,今天给大家分享一下Excel分区一般分为两种情况。

1、根据第一行字段中的字段将表格拆分为多张表

2将Excel文件按sheet名拆分为多个Excel文件

控制它们非常简单,只需点击几下鼠标即可轻松完成。

1分成几张

将表拆分为多个工作表的最简单方法是使用数据透视表。假设我们要按省份拆分表。

1创建数据透视表

首先,我们单击表中的任意单元格,然后将数据透视表插入到新工作表中,然后检查右侧字段列表中字段的顺序。勾选复选框后,单击[类别摘要]上的[设计]。]设置为不显示,[总计]设置为禁用行和列,[报表布局]设置为以表格形式显示并重复所有标签,这样你就得到了一个与数据源一模一样的表格

2数据透视表的分布

这里我们要根据省份字段来拆分数据,所以将【省份】字段放入右侧字段列表中的过滤区域中,然后点击【数据透视表设计】,找到最左侧的【选项】,然后点击【显示报表过滤页面】,点击确定。此时,会按照省份批量创建新的工作表。

3编辑分区表

分区后的表是数据透视表,表头为[求和项:]如果没有影响,则不需要执行此步骤。我们可以将表中的[sumitem:]进行替换。

首先选择第一个sheet的名称,然后按住Shift键选择最后一个sheet的名称这样左上角需要设置的表格就会被选中,然后我们将其粘贴为一个值删除前2行,然后CtrlH调出替换,将其替换为设置为总计项目:然后单击全部替换,这样标题中的总计项目:将被删除,拆分将完成。

2拆分成多个Excel文件

如果你想将Excel拆分成多个Excel文件,最简单的方法是使用vba代码首先,我们复制以下代码

细分工作簿()

DimxpathAsString

xpathActiveWorkbookPath

DimshtAs工作表

ForEachshtInActiveWorkbookSheets

嘘。

ActiveWorkbookSaveAsFilename:xpath''shtName'xlsx'

ActiveWorkbook关闭

下一个

MsgBox工作簿被拆分!'

结束子

然后点击【开发工具】,点击【VisualBasic】,然后在弹出的界面中点击【插入】,选择【模块】,然后直接插入代码点击上面的小三角,稍等一下分割完成后,会提示【工作簿分割完成】,点击确定分割后的Excel文件的保存路径与打开的Excel文件的路径相同。

以上就是今天分享的全部内容了,怎么样?你学会了吗?

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

本站文章均由用户上传或转载而来,该文章内容本站无法检测是否存在侵权,如果本文存在侵权,请联系邮箱:2287318951@qq.com告知,本站在7天内对其进行处理。

发布评论