如果Excel工作簿中的每个工作表都包含多个图表，现在您想将所有图表批量移动到新创建的工作表中，您可以参考这篇文章。这里我们将介绍两种简单的方法。
在为Excel工作簿的每个工作表中的数据创建图表后，为了更好地根据这些图表分析数据，您可能希望将所有这些图表收集到同一个工作表中。换句话说，您可能希望将它们全部移动到新的工作表中。如果图表很少，可以使用下面的方法一来逐个移动。然而，如果有无数的图表，你最好使用后一个。
方法一:手动逐个移动图表
- 首先，创建一个要移动所有图表的新工作表。
- 然后，打开一个工作表，在其中的图表上进行演讲。
- 接下来，右键单击图表，从上下文菜单中选择“移动图表”。
- 在弹出的“移动图表”对话框中，在“对象中”列表中选择新表格，单击“确定”。
- 选中的图表将立即被移动。
- 现在，您可以使用这种方式逐一处理所有工作表中的所有图表。
方法二:用Excel VBA批量移动
- 首先，启动Excel VBA编辑器根据“如何在Excel中运行VBA代码”。
- 然后，将以下代码放入模块或项目中。
Sub MoveAllCharts() Dim strNewSheet As String Dim objTargetWorksheet As Worksheet Dim objWorksheet As Worksheet Dim objChart As Object '创建一个新表strNewSheet = "Charts" ActiveWorkbook.Worksheets.Add(Before:=Application.Worksheets(1))。名称= strNewSheet设置objTargetWorksheet = Application.Worksheets(strNewSheet)对于Application.ActiveWorkbook.Worksheets中的每个objWorksheet如果objWorksheet. worksheets。将每个图表一个一个地移动到新的表中，每个objChart在objWorksheet中。ChartObjects objChart. chart . location xlLocationAsObject, strNewSheet Next objChart结束If Next objTargetWorksheet。激活结束子
- 之后，直接按“F5”立即运行这个宏。
- 当宏完成时，退出VBA编辑器。
- 在Excel主窗口中，您可以看到一个新的工作表，其中可以看到所有的图表。
比较
| 优势 | 缺点 | |
| 方法1 | 操作简单 | 你必须一个一个地移动 |
| 方法2 | 能批量处理所有图表吗 | 用户必须小心外部宏 |
修复损坏的Excel文件
Excel文件很容易损坏，因为Excel有时会崩溃。在这样的情况下，你最好准备一个强大的和值得信赖的xlsx复苏工具，如DataNumen Excel Repair。当你的Excel文件被损坏，Excel的自动恢复功能不起作用时，它就会派上用场。
作者简介:
Shirley Zhang是DataN万博ManBetX手机下载umen, Inc.的数据恢复专家，该公司是数据恢复技术的世界领导者，包括修复sql并展望维修软件产品。万博体育app官方网下载欲了解更多信息，请访问www.circareview.com
留下回复