问答文章1 问答文章501 问答文章1001 问答文章1501 问答文章2001 问答文章2501 问答文章3001 问答文章3501 问答文章4001 问答文章4501 问答文章5001 问答文章5501 问答文章6001 问答文章6501 问答文章7001 问答文章7501 问答文章8001 问答文章8501 问答文章9001 问答文章9501

怎样将Excel文档里的工作表制成单独的EXCEL文档

发布网友 发布时间:2022-04-22 14:37

我来回答

2个回答

热心网友 时间:2023-06-21 23:45

用宏命令 另存所有工作表为工作簿
使用方法:
1、打开你的工作簿

2、按Alt+F11进入VBA

3、在工程资源管理器窗口单击鼠标右键,选择插入->模块

4、把那个下面代码粘贴到模块中,运行一下就

Sub 另存所有工作表为工作簿()
Dim sht As Worksheet
Application.ScreenUpdating = False '禁用屏幕刷新
ipath = ThisWorkbook.Path & "\" '当前工作簿的文件目录
For Each sht In Sheets
sht.Copy
ActiveWorkbook.SaveAs ipath & sht.Name & ".xls" '(工作表名称为文件名)
ActiveWorkbook.Close
Next
Application.ScreenUpdating = True '恢复屏幕刷新
End Sub

热心网友 时间:2023-06-21 23:45

你说的是文档里其中的一部分要做成单独的吗?
声明声明:本网页内容为用户发布,旨在传播知识,不代表本网认同其观点,若有侵权等问题请及时与本网联系,我们将在第一时间删除处理。E-MAIL:11247931@qq.com
女生多大后可以不在长身高? 如何不用软件把手机投屏到电脑上手机屏幕怎样投放到电脑上 战时拒绝、故意延误军事订货罪既遂的处罚? 战时故意延误军事订货罪处罚标准 名师1+1导读方案:汤姆·索亚历险记目录 三星sm-g7200打开微信慢,无法正常收看,网速不慢。 笔记本电脑如何调亮屏幕亮度 大伙说说洗衣机要不要带烘干好 热烘干洗衣机怎么样 ef英语哪个好 苹果手机表格怎样导入各种文件做成文件夹 怎么把excel表格做成pdf 表格怎么转文档 怎么把表格标题生成文件命 怎样把电子表格变成word文档 怎么把excel表格中的内容转换成文件夹 表格的文件怎么转换成word文档 表格文件怎么制作 在wps制作的表格怎么制成文件 我QQ里误发了很大一个红包,他已经领了,能找回么 QQ发错红包,要怎样才能够弄回去 红包发错了对方领取了怎么找回 window10系统电脑没有声音怎么设置 win10系统电脑没有声音 老板牌油烟机油渍怎么清洗 老板油烟机5600怎么清洗 华为nova7换手机后盖需要拆机吗 华为维修配件官网价格查询 荣耀的,换手机配件价格在哪查? 华为官网配件报价怎么查? 人经常生气会怎样 经常生气会怎样? 人生气会怎么样??? 生气容易怎么样 太过生气会怎么样 生气会对身体怎么样? 人一旦生气了,会怎么样 太生气身体会怎么样? 经常生气会怎么样 经常生气会怎样?对身体有什么影响 经常生气的人容易得哪些疾病,怎样才能做到不生气呢? 女人经常生气会怎么样 经常发脾气的人会怎样 人经常生气会怎么样 生气会怎么样` 生气会怎么样会带来什么后果 经常生气会怎么样? 生气严重了会怎么样 容易生气怎么办 打印机换完墨粉后仍显示更换墨粉盒是什么原因?