一个Excel工作簿中的多个工作表怎么拆分成独立表格

2024-11-08 05:39:44
推荐回答(3个)
回答1:

1、按照需求新建工作表名称,比如:独立1.xlsx,独立2.xlsx等

2、打开这些工作薄,和要拆分的工作薄

3、搏敬右击要拆分的工作表标签,选择移指拍动或复制工作表

4、在弹出的移动或复制工作表对话框中,“工作薄”栏选择目标工作薄名称(比如独立1.xlsx),在“下列选定工作表之前”,选择存放工作表的位置,如果原工作薄要保留此工作表,请勾选唯银羡“建立副本”,确定,此工作表就单独在新命名(独立1.xlsx)的工作表里面了。

5、重复上面步骤,可将每个工作表单独建立一个工作薄。

回答2:

使枝梁用握晌VBA可能比较猛皮运快!
sub Sheet2workbook()
Dim Sht As Worksheet, Wp As String, Wkb As Workbook
Set Wkb = ActiveWorkbook
Wp = Wkb.Path
For Each Sht In Wkb.Worksheets
Sht.Select
Sht.Copy
ActiveWorkbook.SaveAs Filename:=Wp & "\" & Sht.Name & ".xlsx", FileFormat _
:=xlOpenXMLWorkbook, CreateBackup:=False
ActiveWorkbook.Close 0
Next
End Sub

回答3: