将多个sheet页拆分成多个单独的excel

1、按住 ALT + F11 键打开 Microsoft Visual Basic for Applications 窗口或者是在sheet页的名字处右键，点击查看代码

2、点击插入 > 模块，并将以下代码粘贴到模块窗口中。

Private Sub 分拆工作表()Dim sht As WorksheetDim MyBook As WorkbookSet MyBook = ActiveWorkbookFor Each sht In MyBook.Sheetssht.CopyActiveWorkbook.SaveAs Filename:=MyBook.Path & "\" & sht.Name, FileFormat:=xlNormal '将工作簿另存为EXCEL默认格式ActiveWorkbook.CloseNextMsgBox "文件已经被分拆完毕!"End Sub

3、按F5运行代码

将多个sheet页拆分成多个单独的excel相关推荐

怎么将Excel多个工作表拆分成多个单独的Excel
以下是office中的EXCEL,wps会员的话自带拆分功能(特别方便) 例如工作薄中有多个工作表,如图: 将一个Excel工作簿中的多个工作表(sheet)拆分成如下图所示结果打开需要拆分的ex ...
python拆分excel的sheet为单文件_WPS 2019 多个sheet表拆分成独立的excel文件
参考: 场景:将多个sheet表拆分成独立的excel文件一.安装VB工具: 默认情况下:wps -- 开发工具 --- VB 编辑器是灰选状态(即不可用状态),此时需要先安装vb工具:VBA Fo ...
excel拆分为多个sheet工作表或多个单独的excel文件。超好用
excel拆分一.前言二.准备员工信息表测试数据三.拆分三(1):根据所在分公司列拆分为多个sheet 操作步骤 1. 选中要拆分的sheet,右键单击"查看代码",如图: ...
python分解word文档为多个_将一个word文档按一页或多页拆分成多个文档
工作中,有时候碰到需要将一个比较大的word按照指定的页数分割成若干个小的word文档,下面提供分割的方法供参考: 一.按照单页拆分 1.在Word里面打开那个需要分割的文档(假设它的文件名叫做&qu ...
将一个word文档按一页或多页拆分成多个文档
工作中,有时候碰到需要将一个比较大的word按照指定的页数分割成若干个小的word文档,下面提供分割的方法供参考: 一.按照单页拆分 1.在Word里面打开那个需要分割的文档(假设它的文件名叫做&qu ...
怎么把几百页的PDF按目录拆分成多个单独的文件？
有时我们在查看PDF文档或电子书时,文档页面比较多,比如有好几百页,如何才能将这个PDF文件按照目录中的页码拆分成对应的多个单独的文档呢? 目前能搜索到的PDF提取方法有很多,而大多都是单次操作只能提 ...
将excel按照某一列拆分成多个单独文件
1.打开目标excel,按alt + f11键打开VBE窗口 2.选择插入->模块粘贴下面代码到编辑器中代码: Sub 保留表头拆分数据为若干新工作簿()Dim arr, d As Objec ...
wps合并所有sheet页_Python一键合并上千个Excel表，一天的工作量一小时搞定！下班...
一.老板的需求总是莫名奇妙老板需求:一天老板说,嘿!放牛娃,将这些excel表合并到一个总表里,下班前交给我老板话刚讲完,我心里就想,这还不简单么,excel不就是有合并表的功能么!!简单的要死! ...
Excel将一个sheet页拆分多个
命令如下: Sub CFGZB()Dim myRange As VariantDim myArrayDim titleRange As RangeDim title As StringDim colu ...

将多个sheet页拆分成多个单独的excel

将多个sheet页拆分成多个单独的excel相关推荐

最新文章

热门文章