如何将一个word表格垂直拆分成两个表格?

1、怎么拆分一个Excel工作簿中的多个工作表？首先我们在我们的电脑桌面上我们打开一个excel的工作表，里面有很多个不同的工作表

2、接着我们在页面里找到工作表的名字，并且我们使用鼠标来右击一下，然后我们查看代码

3、在空白处粘贴复制以下内容Private Sub 分拆工作表()Dim sht As WorksheetDim MyBook As WorkbookSet MyBook = ActiveWorkbookFor Each sht In MyBook.Sheetsht.CoActiveWorkbook.SaveAs Filename:=MyBook.Path & "\" & sht.Name, FileFormat:=xlNormal '将工作簿另存为EXCEL默认格式ActiveWorkbook.CloseNextMsgBox "文件已经被分拆完毕!"End Sub。

4、最后我们直接点击页面上方“运行”-“运行子过程/用户窗口”即可拆分，这样我们的表格就分成俩个了