Tipp: Az egyéb nyelvek a Google Fordítva vannak. Látogasson el a English a link verziója.
Belépek
x
or
x
x
Regisztráció
x

or

Hogyan lehet adatokat kinyerni a grafikonról vagy grafikonról Excel-ben?

doc-kivonat-chart-data-1
Az Excel rendszerben általában diagramot használunk az adatok és a trend megjelenítéséhez, hogy jobban meg lehessen nézni, de néha talán a diagram egy másolat, és a grafikon eredeti adatait nem tartalmazza az alábbi képernyőkép jelenik meg. Ebben az esetben érdemes kivonni az adatokat a diagramból. Most ez a bemutató egy diagramról vagy grafikonnal kapcsolatos adatokról szól.
VBA adatbevitel adatbázisa

Navigáció--Auto szöveg (adjon hozzá általában használt grafikonokat az AutoText panelhez), ha egy kattintással beszúrja, amikor szüksége van rá.)

excel add eszközöket a vízesés diagram beillesztéséhez bármikor

arrow kék jobb buborék VBA adatbevitel adatbázisa


1. Új munkalapot kell létrehoznia és átnevezni ChartData. Lásd a képernyőképet:

Kutools for Excel, Több mint 120 hasznos Excel-funkciók, növeli a munka hatékonyságát és a munkaidőt.

doc-kivonat-chart-data-5

2. Ezután jelölje ki azt a táblázatot, amelyből adatokat kíván kivonni, és nyomja meg a gombot Alt + F11 gombok egyszerre, és a Microsoft Visual Basic for Applications ablak kiugrik.

3. kettyenés betétlap > Modulok, majd illessze be a VBA kód alá a poppingot Modulok ablak.

VBA: Adatbevitel diagramból.

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. Ezután kattintson futás gombot a VBA futtatásához. Lásd a képernyőképet:

doc-kivonat-chart-data-2

Ezután láthatja az adatok kibontását ChartData lapot.

doc-kivonat-chart-data-3

Export tartomány mint grafikon

Kutools' Export tartomány mint grafikon célja, hogy mentse vagy exportálja a kiválasztási cellákat több grafikai formátumban.
doc export tartomány mint kép

Tipp:

1. Formázhatja a cellákat amennyire szüksége van.

doc-kivonat-chart-data-4

2. A kiválasztott grafikon adatai a ChartData lap első cellájába kerülnek alapértelmezés szerint.

figyeljen 1Ha érdekel ez a kiegészítő, töltse le az 60 napos ingyenes próbaidőszakot.


Ajánlott termelékenységi eszközök

Office Tab

arany star1 Kényelmes lapokat hozhat Excel és más Office szoftverekhez, akárcsak a Chrome, a Firefox és az új Internet Explorer.

Kutools for Excel

arany star1 Elképesztő! Növelje termelékenységét 5 perc alatt. Nincs szükség különleges képességekre, kivéve két órát minden nap!

arany star1 300 Az Excel új funkciói, az Excel nagyon egyszerű és erőteljes:

  • A cella / sorok / oszlopok egyesítése adatok elvesztése nélkül.
  • Több lap és munkafüzet kombinálása és egységesítése.
  • Hasonlítsa össze a tartományokat, másolja a többszörös tartományokat, konvertálja a dátumot, a mértékegységet és a pénznemek konverzióját.
  • Számolás a Színek, a Paging Subtotals, az Advanced Sort és a Super Filter,
  • Több Select / Insert / Delete / Szöveg / Formátum / Link / Comment / Workbooks / Worksheets Tools ...

A Kutools for Excel képernyőkép

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 · 2 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!