如何在Excel中從圖表中提取數據？

在Excel中，我們通常使用圖表來顯示數據和趨勢以便更清晰地查看，但有時，圖表可能是副本，并且您沒有圖表的原始數據，如下面的屏幕快照所示。 在這種情況下，您可能需要從該圖表中提取數據。 現在，本教程討論的是從圖表或圖形中提取數據。

使用VBA從圖表中提取數據 使用VBA從圖表中提取數據

1.您需要創建一個新的工作表并將其重命名為 圖表數據。 看截圖：

2.然后選擇要從中提取數據的圖表，然后按 Alt + F11鍵 同時輸入一個鍵 Microsoft Visual Basic應用程序 窗口彈出。

3。 點擊 插頁 > 模塊，然后將以下VBA代碼粘貼到彈出窗口 模塊 窗口。

VBA：從圖表中提取數據。

Sub GetChartValues()Updateby20220510Dim xNum As IntegerDim xSeries As ObjectOn Error Resume NextxCount = 2xNum = 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 WithFor Each xSeries In Application.ActiveChart.SeriesCollectionApplication.Worksheets("ChartData").Cells(1, xCount) = xSeries.NameWith Application.Worksheets("ChartData").Range(.Cells(2, xCount), _.Cells(xNum + 1, xCount)) = _Application.WorksheetFunction.Transpose(xSeries.Values)End WithxCount = xCount + 1NextEnd SubCopy

4。 然后點擊 運行 按鈕以運行VBA。 看截圖：

然后您可以看到數據被提取到 圖表數據

片。

提示：

1.您可以根據需要格式化單元格。

2.默認情況下，所選圖表的數據被提取到ChartData表的第一個單元格中。

提示： 如果您通常在Excel中使用復雜的圖表，這會很麻煩，因為創建時間很長，請在此處使用 自動文本 的工具 Kutools for Excel，您只需要在第一時間創建圖表，然后將圖表添加到“自動圖文集”窗格中，然后就可以隨時隨地重用它們，您唯一需要做的就是更改引用以符合您的實際需求。 點擊

.

最佳辦公生產力工具

將小時轉化為分鐘 Kutools for Excel!

準備好增強您的 Excel 任務了嗎？ 利用的力量 Kutools for Excel - 您終極的節省時間的工具。 簡化復雜的任務并像專業人士一樣瀏覽數據。 以閃電般的速度體驗 Excel！

為什么需要 Kutools for Excel