如何将1个excel文件中的100个工作表拆分成独立的excel文件

Posted 2023-04-06

参考技术A

如何将1个excel文件中的100个工作表拆分成独立的excel文件

手动选择需要拆分的工作薄，比如选择的工作薄名为“需要拆分的工作薄甲”，把该工作薄里面的所有工作表都拆分成单独的工作薄，并以其工作表的名称做为新工作薄名称，存放在本工作薄所在目录下面的名称为“拆分-需要拆分的工作薄甲-得到的工作薄”的文件夹中。

1、首先要选择是否需要拆分后的工作表数值化。

2、其次选择需要拆分的工作薄。只能选择一个。

如何将多个独立的EXCEL文件（每个只有一个工作表）合并到一个文件中，并独立成一个工作表？（文件很多）

有一工具,保证能完成你的要求,EXCEL工具箱,张立良做的,版本应该是7.2了吧,很有名的,你网上搜下,如果没找到问我要,

怎样通过“宏”把excel中的一个工作表中的行拆分成若干个独立的文件？

假定要将sheet1表第二行起每一行创建为一个新工作簿（独立文件），工作簿以B列单元格值命名。
1、ALT+F11
2、插入模块
3、粘贴以下代码到模块中
Sub 拆分()
Dim i As Long
Dim na As String
Application.ScreenUpdating = False
For i = 2 To Sheets("sheet1").Range("b65536").End(xlUp).Row
na = Sheets("sheet1").Cells(i, 2).Value
Sheets("sheet1").Copy
ActiveWorkbook.SaveAs Filename:=ThisWorkbook.Path & "\\" & na & ".xls"
Rows(i).Copy Rows("2")
Rows("3:" & Range("b65536").End(xlUp).Row).Delete
ActiveWindow.Close savechanges:=True
Next
Application.ScreenUpdating = True
End Sub
4、运行宏“拆分”

如何将excel中的多个工作表快速分成独立的

本篇经验贴子中，我将向大家分享如何利用函数将一个Excel工作簿中的多个工作表拆分成为单独的工作簿文件。步骤亦不负责，具体请参看内容。希望对你有所帮助！
1、打开需要编辑的Excel文档。如图所示，工作簿下方有很多工作表。现在需要将这些工作表单独拆分开成一个个工作簿。
2、右键任意一个工作表标签，在弹出的下拉列表中选择查看代码。即弹出代码窗口。如下图所示。
3、点击菜单插入-模块 在弹出的模块对话框中 输入以下代码：
4、单击运行-运行子过程|窗体 几秒过后 弹出提示窗口“文件已被拆分完毕” 如下图所示
5、返回Excel工作簿文件所在路径 查看 如下图所示 原先工作簿中的工作表已经成为单独的工作簿了！不信 可以对照查看图中的修改日期

如何将100个excel文件合并成1个excel100个工作表，每个工作表名字对应原excel文件

将多个Excel文件合并为一个Excel文件
步骤：宏--创建--输入下面内容：
Sub CombineWorkbooks()
Dim FilesToOpen
Dim x As Integer
On Error GoTo ErrHandler
Application.ScreenUpdating = False
FilesToOpen = Application.GetOpenFilename _
(FileFilter:="MicroSoft Excel文件(*.xls),*.xls", _
MultiSelect:=True, Title:="要合并的文件")
If TypeName(FilesToOpen) = "Boolean" Then
MsgBox "没有选中文件"
GoTo ExitHandler
End If
x = 1
While x <= UBound(FilesToOpen)
Workbooks.Open Filename:=FilesToOpen(x)
Sheets().Move after:=ThisWorkbook.Sheets _
(ThisWorkbook.Sheets.Count)
x = x + 1
Wend
ExitHandler:
Application.ScreenUpdating = True
Exit Sub
ErrHandler:
MsgBox Err.Description
Resume ExitHandler
End Sub

如何将1个工作簿里的N个工作表拆分成N个单独的Excel文档

在要移出的工作表名处点击右键,"移动或复制工作表",在"移至:"处下拉选择新的工作簿,"确定"即可,试试看,希望可以帮到你!

如何将一个工作簿中多个工作表拆分成独立的工作簿

用右键点击工作表标签，移动或复制工作表，工作簿-新工作簿，保存即可 。

可以按下面的步骤：(1) 在要复制的sheet标签上点鼠标右键；(2) 弹出的窗口中选"移动或复制工作表"；(3) 弹出的窗口中点下拉框，然后选"(新工作簿)"；(4) 如果是复制，勾选"建立副本"，如果是剪切，不勾选该选项， 确定(5) 保存，这样，一个新的excel文件就好了。 看看下面的演示过程吧。

比如SHEET2要拆分，右键点击SHEET2——移动或复制——工作簿下方选项，新工作簿——确定。

如何把excel表拆分成独立工作表

方法/步骤
1
如图所示，我们可以看到这个工作簿中有很多工作表，如何将这个工作表独立出来，成为分一个独立的文件呢？
2
这个时候大家可以百度一下并安装WPS 2009,记住WPS2009的版本不要太高。下载安装成功后记得要关闭自动升级功能。
打开WPS表格，在”工具“菜单中选择”插件平台“
在“推荐插件”点击“浏览全部插件”
在搜索框中输入“工作簿拆分”找到对应的插件后点击“立即安装”按钮。
这个时候会弹出一个小窗口点击“允许”按钮。
这个时候会提示安装成功。
我们在工具栏位置也会看到这个刚刚安装的工具。
这个时候我们选择要拆分的EXCEL工作簿。右击在弹出的菜单选择打开方式为WPS。
这个时候我们点击“工作簿拆分”工具。
这个时候我们选择拆分出来的工作表的保存位置，并选择后缀名为XLS，选择要独立出来的工作表。最后点击“拆分”按钮。
这个时候我们会发现工作簿中的所有以自己工作表名称为文件名称独立出来，是不是很快哦？

如何将多张工作表的excel合并为一个excel？

【中文标题】如何将多张工作表的excel合并为一个excel？

【英文标题】：How to concat excels with multiple sheets into one excel?

【发布时间】：2021-10-13 18:12:20

【问题描述】：

该文件夹包含至少 20 个 Excel。每个 excel 包含九张工作表。这些 excel 具有相同类型的工作表（相同的标题但不同的数据）。我需要将这 20 个 excel 逐页合并为一个 excel。每个excel中的前两张是说明。它们是可跳过的。我怎样才能做到这一点？谢谢！

示例：文件 A 表 3、文件 B 表 3、文件 A 表 4、文件 B 表 4

所以最终组合文件会是这样的：

【问题讨论】：

这能回答你的问题吗？ Import multiple excel files into python pandas and concatenate them into one dataframe

相关using-pandas-to-pd-read-excel-for-multiple-worksheets-of-the-same-workbook和pandas-read-excel-with-multiple-sheets-and-specific-columns

您考虑过使用 PowerQuery 吗？

【参考方案1】：

不久前我不得不做一些类似的事情：

这段代码应该可以为您解决问题：

import pandas as pd
import os

collection = 
for file in os.listdir():
    if file.endswith(".xlsx"):
        mysheets = pd.ExcelFile(file)
        mysheetnames = mysheets.sheet_names
        for i in mysheetnames[2:]: #change the 2 in [2:] to change how many sheets you delete
            mydata = pd.read_excel(file, i)
            combi = collection.get(i, [])
            collection[i] = combi + [mydata]

writer = pd.ExcelWriter('output.xlsx', engine='xlsxwriter')

for key in collection:
    myresult = pd.concat(collection.get(key), sort=False)
    myresult.to_excel(writer, sheet_name=key)

writer.save()

【讨论】：

谢谢。出于某种原因，此代码仅创建一个 Excel 文件，每隔三张表连接一次。

您是复制了我的代码，还是重新输入了代码？听起来你忘记了双点。例如你写的是：mysheetnames[2] 而不是mysheetnames[2:]（区别是“：”）

也许我对你的问题的解释不同，但问题是在 excel 文件中存在一张 1 表？并且您想维护您拥有的所有工作表名称？

是的。您提供的代码仅使用一张工作表创建一个 excel（所有工作表来自不同的 excel），但我需要每个工作表单独组合。例如，文件 A 中的工作表 3 应与文件 B 中的工作表 3 组合，依此类推。所以结果文件最终应该有 9 张（在你的情况下是 7 张没有说明书）。

还是一样。你试过你的代码了吗？