Mae cwcis yn ein helpu i gyflwyno ein gwasanaethau. Drwy ddefnyddio ein gwasanaethau, rydych yn cytuno i'n defnydd cwcis.
Tip: Mae ieithoedd eraill yn Google-Cyfieithu. Gallwch ymweld â'r English fersiwn o'r ddolen hon.
Mewngofnodi
x
or
x
x
cofrestr
x

or

Sut i dynnu data o siart neu graff yn Excel?

doc-extract-chart-data-1
Yn Excel, fel arfer byddwn yn defnyddio siart i ddangos data a thueddiad i'w weld yn fwy eglur, ond weithiau, efallai bod y siart yn gopi ac nid oes gennych ddata gwreiddiol y siart fel y dangosir y sgrin isod. Yn yr achos hwn, efallai y byddwch am dynnu'r data o'r siart hon. Nawr mae'r tiwtorial hwn yn sôn am ddata sy'n tynnu o siart neu graff.
Dethol data o siart gyda VBA

Llywio--AutoText (ychwanegwch siartiau a ddefnyddir fel arfer i AutoText pane.then un cliciwch i'w fewnosod pan fyddwch ei angen.)

rhagorwch ychwanegu at offer ar gyfer gosod siart rhaeadr ar unrhyw adeg

swigod saeth cywir glas Dethol data o siart gyda VBA


1. Mae angen ichi greu taflen waith newydd a'i ail-enwi fel ChartData. Gweler y sgrin:

Kutools ar gyfer Excel, gyda mwy na 120 swyddogaethau Excel defnyddiol, gwella effeithlonrwydd gweithio ac arbed amser gweithio.

doc-extract-chart-data-5

2. Yna dewiswch y siart yr ydych am ei dynnu o'r data a'i wasgu Alt + F11 allweddi ar yr un pryd, a Microsoft Visual Basic ar gyfer Ceisiadau pops ffenestr.

3. Cliciwch Mewnosod > Modiwlau, yna pastwch y cod VBA isod i'r popping Modiwlau ffenestr.

VBA: Dethol data o siart.

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. Yna cliciwch Run botwm i redeg y VBA. Gweler y sgrin:

doc-extract-chart-data-2

Yna gallwch chi weld y data yn cael ei dynnu i ChartData taflen.

doc-extract-chart-data-3

Ystod Allforio fel Graffeg

Kutools' Ystod Allforio fel Graffeg yw anelu at achub neu allforio celloedd dethol fel fformatau graff lluosog.
ystod allforio doc fel llun

Tip:

1. Gallwch chi fformatio'r celloedd fel y bo angen.

doc-extract-chart-data-4

2. Mae data'r siart a ddewiswyd yn cael ei dynnu i gell cyntaf y daflen ChartData yn ddiofyn.

talu sylw1Os oes gennych ddiddordeb yn yr ychwanegiad hwn, lawrlwythwch y prawf rhad ac am ddim 60-days.


Offer Cynhyrchiant a Argymhellir

Tab Swyddfa

star1 aur Dewch â thafiau defnyddiol i Excel a meddalwedd Swyddfa eraill, yn union fel Chrome, Firefox a Internet Explorer newydd.

Kutools ar gyfer Excel

star1 aur Yn rhyfeddol! Cynyddu eich cynhyrchedd mewn munudau 5. Peidiwch ag angen unrhyw sgiliau arbennig, arbed dwy awr bob dydd!

star1 aur 300 Nodweddion Newydd ar gyfer Excel, Gwnewch Excel Yn Fach Hawdd a Phwerus:

  • Cyfuno Cell / Rows / Colofnau heb Colli Data.
  • Cyfuno a Chyfuno Taflenni Lluosog a Llyfrau Gwaith.
  • Cymharwch Rangau, Copi Lluosog, Trosi Testun hyd yma, Uned ac Addasu Arian.
  • Count by Colors, Subtotals Paging, Trefnu Uwch ac Uwch Hidlo,
  • Mwy Dethol / Mewnosod / Delete / Text / Format / Link / Comment / Llyfrau Gwaith / Taflenni Gwaith Offer ...

Sgrîn sgript o Kutools ar gyfer 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!