拆分一个Excel工作簿中的多个工作表.docx
( 4.5 )《拆分一个Excel工作簿中的多个工作表.docx》由会员分享，可在线阅读，更多相关《拆分一个Excel工作簿中的多个工作表.docx（5页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。
精选优质文档-倾情为你奉上拆分一个Excel工作簿中的多个工作表1、打开需要编辑的Excel文档，工作簿下方有很多工作表。现在需要将这些工作表单独拆分开成一个个工作簿。2、右键任意一个工作表标签，在弹出的下拉列表中选择“查看代码”。即弹出代码窗口。3、点击菜单“插入”-“模块”， 在弹出的模块对话框中 输入以下代码：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, FileFormat:=xlNormal 将工作簿另存为EXCEL默认格式 ActiveWorkbook.Close Next MsgBox 文件已经被分拆完毕! End Sub4、单击“运行”-“运行子过程/用户窗体”，几秒过后弹出提示窗口“文件已被拆分完毕”。5、返回Excel工作簿文件所在路径查看原先工作簿中的工作表已经成为单独的工作簿了。专心-专注-专业
- 配套讲稿：
如PPT文件的首页显示word图标，表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制：
部分文档作品中含有的国旗、国徽等图片，仅作为作品整体效果示例展示，禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词：
- 拆分 一个 Excel 工作 中的
淘文阁 - 分享文档赚钱的网站所有资源均是用户自行上传分享，仅供网友学习交流，未经上传用户书面授权，请勿作他用。
限制150内