Jak extrahovat data z grafu nebo grafu v aplikaci Excel?

Extrahujte data z grafu pomocí VBA
Navigace--Automatický text (přidat obvykle použité grafy do pane.Then AutoText jedním kliknutím jej vložit, když potřebujete.) |

Doporučené nástroje pro práci s aplikacemi Excel / Office
Karta Office: Přineste úpravy na záložkách Excel a další Office software, stejně jako Chrome, Firefox a Safari.30-den Neomezené zkušební verze zdarma
Kutools pro Excel: Výkonné funkce 300 činí aplikace Excel mnohem jednodušší a okamžitě zvyšují produktivitu.60-den Neomezené zkušební verze zdarma
Extrahujte data z grafu pomocí VBA
1. Musíte vytvořit nový list a přejmenovat jej jako ChartData. Zobrazit screenshot:
Kutools pro Excel, s více než 120 praktické funkce aplikace Excel, zvýšit efektivitu práce a ušetřit pracovní čas. |
2. Poté vyberte graf, ze kterého chcete data extrahovat, a stiskněte tlačítko Alt + F11 současně a a Microsoft Visual Basic pro aplikace okno se objeví.
3. cvaknutí Vložit > Modul, potom vložte pod kódy VBA popup Modul okno.
VBA: Výpis dat z grafu.
Sub GetChartValues() 'Updateby20150203 Dim xNum As Integer Dim xSeries As Object xCount = 2 xNum = UBound(Application.ActiveChart.SeriesCollection(1).Values) Application.Worksheets("ChartData").Cells(1, 1) = "X Values" With Application.Worksheets("ChartData") .Range(.Cells(2, 1), _ .Cells(xNum + 1, 1)) = _ Application.Transpose(ActiveChart.SeriesCollection(1).XValues) End With For Each xSeries In Application.ActiveChart.SeriesCollection Application.Worksheets("ChartData").Cells(1, xCount) = xSeries.Name With Application.Worksheets("ChartData") .Range(.Cells(2, xCount), _ .Cells(xNum + 1, xCount)) = _ Application.WorksheetFunction.Transpose(xSeries.Values) End With xCount = xCount + 1 Next End Sub
4. Pak klikněte na tlačítko Běh pro spuštění VBA. Zobrazit screenshot:
Pak můžete vidět data, která jsou extrahována ChartData list.

Exportní rozsah jako grafický |
Kutools' Exportní rozsah jako grafický je cílem uložit nebo exportovat výběrové buňky jako několik grafických formátů. |

Tip:
1. Můžete buňku formátovat, jak potřebujete.
2. Data vybrané grafu jsou ve výchozím nastavení extrahována do první buňky listu ChartData.
![]() |
Doporučené nástroje pro produktivitu
Karta Office
Přiveďte praktické karty do aplikace Excel a jiného softwaru Office, stejně jako Chrome, Firefox a nový Internet Explorer.
Kutools pro Excel
Úžasný! Zvyšte svou produktivitu v minutách 5. Nepotřebujete žádné speciální dovednosti, kromě dvou hodin denně!
300 Nové funkce pro aplikaci Excel, Značka Excel je velmi snadná a výkonná:
- Sloučit buňky / řádky / sloupce bez ztráty dat.
- Kombinovat a konsolidovat více listů a sešitů.
- Srovnání rozsahů, kopírování více rozsahů, převod textu na datum, konverzi jednotek a měn.
- Počet podle barvy, dílčí součty stránkování, třídění podle rozšířeného třídění a super filtru,
- Více Vyberte / Vložit / Odstranit / Text / Formát / Odkaz / Komentář / Workbooks / Worksheets Nástroje ...