Cookies hjälper oss att leverera våra tjänster. Genom att använda våra tjänster samtycker du till vår användning av cookies.
Tips: Andra språk är Google-översatta. Du kan besöka English version av den här länken.
Logga in
x
or
x
x
Registrera
x

or

Hur extraheras data från diagram eller graf i Excel?

doc-extrakt-diagram-data-1
I Excel brukar vi använda diagram för att visa data och trend för tydligare visning, men ibland är kanske diagrammet en kopia och du har inte de ursprungliga uppgifterna i diagrammet enligt bilden nedan. I det här fallet kanske du vill extrahera data från det här diagrammet. Nu handlar det här handledningen om att extrahera data från ett diagram eller ett diagram.
Extrahera data från diagram med VBA

Navigering--Automatisk text (lägg till vanligtvis använda diagram till AutoText pane.then ett klick för att infoga det när du behöver.)

excel lägg till i verktyg för att infoga vattenfall diagram när som helst

pilblå höger bubbla Extrahera data från diagram med VBA


1. Du måste skapa ett nytt arbetsblad och byta namn på det som ChartData. Se skärmdump:

Kutools för Excel, med mer än 120 praktiska Excel-funktioner, förbättra arbetseffektiviteten och spara arbetstiden.

doc-extrakt-diagram-data-5

2. Välj sedan det diagram som du vill extrahera data från och tryck på Alt + F11 tangenter samtidigt och a Microsoft Visual Basic för applikationer fönster dyker upp.

3. klick Infoga > Modulerna, sedan klistra in under VBA-kod till poppningen Modulerna fönster.

VBA: Extrahera data från diagram.

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. Klicka sedan run knappen för att köra VBA. Se skärmdump:

doc-extrakt-diagram-data-2

Då kan du se datan extraheras till ChartData ark.

doc-extrakt-diagram-data-3

Exportera rad som grafisk

Kutools' Exportera rad som grafisk syftar till att spara eller exportera ett urval celler som flera grafiska format.
doc exportintervall som bild

Dricks:

1. Du kan formatera cellerna som du behöver.

doc-extrakt-diagram-data-4

2. Uppgifterna i det valda diagrammet extraheras till den första cellen i ChartData-arket som standard.

betala attention1Om du är intresserad av denna add-in, ladda ner gratis provperioden 60-dagar.


Rekommenderade produktivitetsverktyg

Fliken Office

guld star1 Hämta praktiska flikar till Excel och annan Office-programvara, precis som Chrome, Firefox och ny Internet Explorer.

Kutools för Excel

guld star1 Fantastiskt! Öka din produktivitet i 5 minuter. Behöver inte några speciella färdigheter, spara två timmar varje dag!

guld star1 300 Nya funktioner för Excel, gör Excel mycket enkelt och kraftfullt:

  • Sammanfoga cell / rader / kolumner utan att förlora data.
  • Kombinera och konsolidera flera ark och arbetsböcker.
  • Jämför rader, kopiera flera rader, konvertera text till datum, enhet och valutaomvandling.
  • Räkna med färger, personsökande subtotaler, avancerad sortering och superfilter,
  • Mer Välj / Infoga / Radera / Text / Format / Länk / Kommentar / Arbetsböcker / Arbetsblad Verktyg ...

Skärmdump av Kutools för Excel

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Astro · 1 years ago
    This doesn't appear to work for a scatter plot as it only extracts one set of "x" data. How can I amend it to extract all "x" data sets?
    • To post as a guest, your comment is unpublished.
      Sunny · 1 years ago
      Sorry I did not found the solution about that.
      • To post as a guest, your comment is unpublished.
        Carlos · 1 years ago
        i've tried with a scatter plot graph as well, but only get one line of valor.


        i need so much to find a way to extract data from scatterplot graphs.
  • To post as a guest, your comment is unpublished.
    Ian · 1 years ago
    I failed to get the prices of a fund chart on my mac excel 2011 . Run time error '91' object variable or block variable not set . Don't know how to debug . Appreciate any help .
  • To post as a guest, your comment is unpublished.
    jignesh · 1 years ago
    Very useful and perfect
  • To post as a guest, your comment is unpublished.
    Berk · 1 years ago
    gives me values that i created chart with not all the values in range
  • To post as a guest, your comment is unpublished.
    Leo · 2 years ago
    Amazing command, thanks a lot!

    I used it with a pivot chart and it works!