如何在Excel中打破图表与源数据的链接？

此方法将介绍一个VBA代码，快速打破Excel工作表中所有图表与其源数据之间的链接。请按照以下步骤操作：

1. 打开要打破所有图表链接的指定工作表，并同时按下“Alt”+“F11”键以打开Microsoft Visual Basic for Applications窗口。

2. 点击“插入”>“模块”，并将VBA代码粘贴到新模块窗口中。

VBA：打破工作表中的所有图表链接

Sub BreakChartLinks()
Dim I As Long
Dim xChartCount As Long
Dim xLinkArr As Variant
Dim xSerColl As Variant
xLinkArr = ActiveWorkbook.LinkSources(xlLinkTypeExcelLinks)
If Not IsEmpty(xLinkArr) Then
For I = LBound(xLinkArr) To UBound(xLinkArr)
ActiveWorkbook.BreakLink xLinkArr(I), xlLinkTypeExcelLinks
Next I
End If
xChartCount = ActiveSheet.ChartObjects.Count
If xChartCount <> 0 Then
For I = 1 To xChartCount
ActiveSheet.ChartObjects(I).Activate
For Each xSerColl In ActiveChart.SeriesCollection
xSerColl.Values = xSerColl.Values
xSerColl.XValues = xSerColl.XValues
xSerColl.Name = xSerColl.Name
Next
Next
End If
End Sub

3. 按下“F5”键或点击“运行”按钮来运行此VBA代码。

现在，您将看到当前工作表中所有图表与源数据的链接都已断开。

如果您安装了“Kutools for Excel”，可以应用其“拆离图表”工具，只需单击一下即可快速断开图表与其源数据之间的链接。

1. 选择需要断开链接的图表。

2. 点击“Kutools”>“图表”>“图表工具”>“拆离图表”以启用此功能。

所选图表与其源数据之间的链接将立即断开。

如何在Excel中打断图表坐标轴？