如何将EXcel 表中每行的相关信息按照固定的格式批量生成新的EXcel 表,每行生成一张表。

发布网友发布时间：2022-04-28 19:40

共4个回答

热心网友时间：2023-10-03 08:18

拆分工作表为工作薄需要用宏来处理

Excel 内按 Alt+F11 视图--代码窗口，
把如下复制进去按F5运行即可
请这个Excel 放到一个文件夹内操作, 默认生成到当前文件夹

Sub fencun()
Application.ScreenUpdating = False
b = Sheets.Count
For i = 1 To b
Sheets(i).Copy
a = ThisWorkbook.Worksheets(i).Name
With ActiveWorkbook
.SaveAs Filename:=ThisWorkbook.Path & "\" & a & ".xlsx"
.Close
End With
Next i
Application.ScreenUpdating = true
End Sub

效果如下例：

热心网友时间：2023-10-03 08:18

嘿嘿，这个我知道。
1、首先选定一行
2、点击工具栏中的数据-----筛选-----自动帅选
3、点击选定的那行，依次选择您要依据此来帅选的相关信息
4、再将生成的那张表复制到另外的表中就可以了
5、最后别忘了恢复哦

觉得我的建议好别忘了把我选择为最佳答案哦，嘿嘿我在辛苦地挣财富值，哎，为了下载东西追问嘿嘿，可我需要的第二表是不同格式的啊。
第一表一行信息，第二表是一张表格。

追答我怎么听不明白你说的呢？你需要的第二表是什么格式，设置下就可以了啊

你将每个新表复制到一个表上不就可以了吗

看我这么热心回答帮我选为最佳答案吧，俺就差这个了谢谢

热心网友时间：2023-10-03 08:19

我也想知道

热心网友时间：2023-10-03 08:19

不知道！！！！！！！！！！！！！