Cookieak gure zerbitzuak hornitzen laguntzen digute. Gure zerbitzuak erabiltzerakoan, cookieen erabilera onartzen duzu.
Aholkua: beste hizkuntza Google-k itzulitako dira. Bisitatu dezakezu English estekaren bertsioa.
Saioa hasi
x
or
x
x
Eman izena
x

or

Nola grafikan grafikoki datuak nola ateratzen diren Excel-en?

doc-estraktua-taula-data-1
Excel-en, ohiko taula erabiltzen dugu datuak eta joera argiago ikusteko, baina batzuetan, agian taula kopia bat da eta ez duzu diagrama honen jatorrizko datuak erakusten den beheko pantailan. Kasu honetan, taula honetako datuak erauz ditzakezu. Orain tutorial hau diagrama edo grafiko batetik ateratako datuak buruz ari da.
Grabatutako datuekin VBA-rekin ateratzea

Navigation--Testu automatikoa (gehitzeko ohiko erabilitako grafikoak AutoText panela. Bertan klik bat sartu behar duzunean txertatzeko.)

excel gehitu urpekaritza taula edonoiz txertatzeko tresnak

arrow urdina eskuineko burbuila Grabatutako datuekin VBA-rekin ateratzea


1. Lan berri bat sortu eta aldatu egin behar duzu ChartData. Ikusi pantaila-argazkia:

Kutools for Excel, gehiago baino gehiago 120 Handy Excel funtzioak, hobetzeko laneko eraginkortasuna eta denbora aurreztea.

doc-estraktua-taula-data-5

2. Ondoren, hautatu datuak ateratzeko eta sakatu nahi dituzun datuak Alt + F11 teklak aldi berean, eta a Microsoft Visual Basic aplikazioak leihoan agertzen da.

3. klik Txertatu > Moduluak, ondoren VBA kodea azpian itsatsi leihoa pizteko Moduluak leihoa.

VBA: taula datuetatik ateratzea.

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. Gero egin klik Korrika egin botoia VBA exekutatzeko. Ikusi pantaila-argazkia:

doc-estraktua-taula-data-2

Ondoren, datuak ateratzeko aukera dago ChartData xafla.

doc-estraktua-taula-data-3

Esportatu Range grafiko gisa

Kutools' Esportatu Range grafiko gisa Aukeraketa-zelulak formatu grafiko ugaritan gorde edo esportatu nahi ditu.
doc esportazioaren barrutia irudi gisa

Aholkua:

1. Gelaxkak formateatu ditzakezu behar duzun moduan.

doc-estraktua-taula-data-4

2. Hautatutako taularen datuak ChartData fitxaren lehen gelaxkan lehenetsitako gelaxkan ateratzen dira lehenespenez.

arreta 1Osagarri hau interesatzen bazaizu, deskargatu 60-eguneko doako proba.


Gomendatutako produktibitate tresnak

Bulegoko fitxa

urrezko izarra1 Lortu erabilgarriak fitxak Excelera eta beste Office softwarearentzako, Chrome bezalakoak, Firefox eta Internet Explorer berriak.

Kutools for Excel

urrezko izarra1 Harrigarria! Handitu zure produktibitatea 5 minutu barru. Ez duzu gaitasun berezirik behar, bi ordu egunero gorde!

urrezko izarra1 300 Ezaugarri berriak Excel-era, Egin Excel oso erraza eta indartsua:

  • Batu gelaxkak / errenkadak / zutabeak datuak galdu gabe.
  • Konbinatu eta finkatzea orri anitzeko lanak.
  • Compare Ranges, Copy Multiple Ranges, Convert Text to Date, Unit eta Currency Conversion.
  • Koloreak arabera, Orrialdeak guztira, Sortu aurreratua eta Super iragazkia,
  • Gehiago Hautatu / Txertatu / Ezabatu / Testua / Formatua / Esteka / Iruzkina / Lan-liburuak / Fitxen tresnak ...

Kutools-en Excel-eko pantaila-argazkia

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!