在日常的工作中,我们可能会遇到将一个工作簿中包含的多个工作表单独拆分成一个个独立的excel,以便将各个独立的工作表分发给需要的人看。这里介绍怎么样将excel工作簿(含多个工作表)拆分成多个独立的工作表。

1、首先安装office完整版任意版本(wps除外)。

2、打开需要拆分的工作簿中的任何一个表格,右键“查看代码”进入VBAProject,例如

3、然后,按F5运行此代码,F5后弹出窗口让输入一个这段宏的名称,给一个名,随便,比如part,然后点击“创建”

4、然后,删除默认代码框中的两行代码

将下面的代码复制到代码框中:

Private Sub 分拆工作表()

Dim sht As Worksheet

Dim MyBook As Workbook

Set MyBook = ActiveWorkbook

For Each sht In MyBook.Sheets

sht.Copy

ActiveWorkbook.SaveAs Filename:=MyBook.Path & “\” & sht.Name ‘将工作簿另存为EXCEL默认格式

ActiveWorkbook.Close

Next

MsgBox “文件已经被分拆完毕!”

End Sub

复制完代码后,如下界面:

5、然后,再按F5运行此代码,画面会出现一闪一闪的,这是在执行此段代码,根据工作表的多少时间会不定,稍等一会,会出现“文件已经被拆分完毕”的提示框。

这时,查看下原始工作簿所在的位置,会看到已经拆分出来了

以上是用代码执行的方法,但是有excel高手,就封装了此段代码,做成了一个小程序,里面还包含另外另个拆分表的按钮,可以完全用小工具的方式代替以上繁琐的方法。

小工具附在文章最后。

小工具界面为:

根据需要选择即可,非常方便!

excel拆分小工具下载地址:

当前内容已被隐藏,您需要登录才能查看

登录立刻注册

cmd看excel有多少个子表_excel表格拆分成多个表格方法工具相关推荐

  1. cmd看excel有多少个子表_快看!杭州各区5月房价表出炉!现在买套房要多少钱?...

    以下二手房价信息综合整理于房天下.安居客 数据仅供参考 杭州房价走势 杭州5月二手房均价 27855 元/m² 杭州4月二手房均价 27600 元/m² 环比上月上涨 0.92% ↑ 同比去年同期下跌 ...

  2. excel将一个工作表根据条件拆分成多个工作表图文教程

    本例介绍在excel中如何将一个工作表根据条件拆分成多个工作表. 注意:很多朋友反映sheets(i).delete这句代码出错,要注意下面第一个步骤,要拆分的数据工作表名称为"数据源&qu ...

  3. Excel表格拆分成多个表格,蜂鸟转换帮您快捷拆分

    Excel表格是用来整理数据使用的,很多办公族会在表格下存储很多数据,当表格中的数据比较多时,想要将表格数据分开整理时,大家可以新建表格,将就表格中的部分数据复制到新建表格中,同时也可以将一个表格拆分 ...

  4. 怎么把一个表格拆分成两个表格

    今天跟大家分享一下怎么把一个表格拆分成两个表格 1.打开演示文件,要求将表格按照部门的不同拆分为两个. 2.首先我们点击下图选项 3.点击[汇总拆分]-[拆分工作表] 4.将[表头行数]设置为2 5. ...

  5. C# EXCEL 根据列内容将原始表格拆分成多个表格

    在日常工作中,我们经常会需要将一个表格的数据拆分为多个表格以满足工作需要.如果只需要拆分成一两个那还好,手动筛选后新建复制就好了,但是一旦需要拆分的表格多达3个以上的时候,这样简单重复拆分表格的工作就 ...

  6. excel将一个工作表根据条件拆分成多个sheet工作表

    本例介绍在excel中如何将一个工作表根据条件拆分成多个工作表.注意:很多朋友反映sheets(i).delete这句代码出错,要注意下面第一个步骤,要拆分的数据工作表名称为"数据源&quo ...

  7. word表格拆分成两个表格

    1.如下图Word表格为产品销售表,现在我们想要将这个Word表格拆分为两个表格. 2.将Word表格复制一份到Excel中. 3.点击下图选项(Excel工具箱,百度即可了解详细的下载安装信息,本文 ...

  8. excel将一个工作表根据条件拆分成多个工作表,并将多个工作表怎么拆分成独立表格

    目录 一.原始数据表如下(sheet页名称为:数据源),需要根据B列人员所属组织拆分成每个组织一个工作表. 二.进入VBE编辑页面 三.插入一个新的模块. 四.在模块1窗口粘入如下代码 ,并保存 五. ...

  9. excel将一个工作表根据条件拆分成多个工作簿

    Function FilePicker() As String'新建一个对话框对象 'MsoFileDialogType 可为以下 MsoFileDialogType 常量之一. 'msoFileDi ...

最新文章

  1. C指针8:二级指针(意思就是指向指针的指针)
  2. 一条命令monkey命令
  3. Python 每次处理一个字符
  4. mybaits四-2:模糊查询
  5. 中国工程师最喜欢的10大WiFi物联网芯片
  6. 最重要的是跑完,而不是刚开始跑得有多快
  7. Css3: gradient背景渐变
  8. xcode 常用快捷键
  9. phpstrom 安装
  10. Struts2_day03--向值栈放数据
  11. 阶段3 2.Spring_04.Spring的常用注解_7 改变作用范围以及和生命周期相关的注解
  12. 引用原话,不等于原意
  13. oracle-pl/sql之二
  14. NSGA2算法中文版详细介绍
  15. kvm虚拟机管理工具列表
  16. 华硕Armoury crate 奥创控制中心 卡在安装安装已连接设备中,安装失败,请重新启动,网络连接失败(-101)
  17. 学习笔记(1):FFmpeg打造Android万能音频播放器-实现变速变调功能(二)
  18. 与卿共赴鸿蒙是什么意思,『为君倾笑°‖笑红颜』「古风」唯美的古风句子,古风签必备!...
  19. 【华人学者风采】忻获麟 加州大学欧文分校
  20. 手把手教大家实现一个电子签名

热门文章

  1. 数据库中的三种完整性
  2. 如何第一次办理港澳通行证、护照、台湾通行证
  3. CUDA: Occupancy(占用率)详解
  4. 清华本科生0人去阿里,交叉信息院硕士没人再深造
  5. 解决导出Excel表的时候,中文文件名出现乱码的问题
  6. BLE蓝牙连接不稳定以及突然断开的原因和解决方法
  7. 快速画简笔画网站推荐以及思考
  8. 南京工程学院计算机英语,南京工程学院是什么意思
  9. ios图锁HQ应用项目源码
  10. 安卓手机查看连接到热点设备的ip地址