Tato metoda zavede VBA k rychlému přerušení vazeb mezi všemi grafy a jejich zdrojovými daty v listu aplikace Excel. Postupujte prosím následovně:

1. Povolte určený list, kde chcete rozbít všechny odkazy na graf, a stiskněte Další + F11 společně otevřete okno Microsoft Visual Basic pro aplikace.

2, klikněte Vložit > Modula poté vložte VBA do nového okna modulu.

VBA: Rozbijte všechny odkazy na grafy v listu

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. lis F5 klíč nebo klikněte na Běh tlačítko pro spuštění tohoto VBA.

Nyní uvidíte, že všechny odkazy na grafy jsou v aktuálním listu rozbity na zdrojová data.

Pokud máte Kutools pro Excel nainstalován, můžete použít jeho Odpojit graf nástroj pro rychlé přerušení spojení mezi grafem a jeho zdrojovými daty jediným kliknutím v aplikaci Excel.

1. Vyberte graf, jehož odkaz musíte v aplikaci Excel přerušit.

2, klikněte Kutools > grafy > Nástroje grafu > Odpojit graf pro povolení této funkce.

Pak uvidíte, že spojení mezi vybraným grafem a jeho zdrojovými daty bylo okamžitě přerušeno.

Jak zlomit osu grafu v aplikaci Excel?