怎样将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

你说的是文档里其中的一部分要做成单独的吗？