Les galetes ens ajuden a lliurar els nostres serveis. En utilitzar els nostres serveis, accepteu el nostre ús de cookies.
Consell: altres idiomes es tradueixen en Google. Pots visitar el English versió d'aquest enllaç.
Iniciar Sessió
x
or
x
x
Registre
x

or

Com s'extreuen les dades de gràfics o gràfics d'Excel?

doc-extract-chart-data-1
En Excel, generalment fem servir gràfics per mostrar dades i tendències per a una visualització més clara, però en ocasions, potser el gràfic és una còpia i no teniu les dades originals del gràfic tal com es mostra a continuació. En aquest cas, és possible que vulgueu extreure les dades d'aquest gràfic. Ara, aquest tutorial està parlant sobre dades que s'extreuen d'un gràfic o gràfic.
Extraieu les dades del gràfic amb VBA

Navegació:Text automàtic (afegiu gràfics generalment utilitzats al plafó del text automàtic. primer feu clic per inserir-lo quan ho necessiti).

Excel afegeix eines per inserir la carta de cascades en qualsevol moment

fletxa blau dreta bombolla Extraieu les dades del gràfic amb VBA


1. Necessiteu crear un full de càlcul nou i canviar-ne el nom ChartData. Mostra la captura de pantalla:

Kutools for Excel, amb més de 120 funcions Excel útils, millorar l'eficiència del treball i estalviar temps de treball.

doc-extract-chart-data-5

2. A continuació, seleccioneu el gràfic que voleu extreure les dades i premeu Alt + F11 tecles simultàniament, i a Microsoft Visual Basic per a aplicacions finestra apareix.

3. clic Insereix > Mòduls, a continuació, enganxeu el codi VBA per sota del popping Mòduls finestra.

VBA: extraieu dades del gràfic.

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. A continuació, feu clic a Correr botó per executar el VBA. Mostra la captura de pantalla:

doc-extract-chart-data-2

A continuació, podeu veure que s'extreuen les dades ChartData full.

doc-extract-chart-data-3

Exporta l'interval com a gràfic

Kutools' Exporta l'interval com a gràfic té com a finalitat desar o exportar una selecció de cel·les com a múltiples formats gràfics.
rang d'exportació doc com a imatge

Consell:

1. Podeu formatar les cel·les com necessiteu.

doc-extract-chart-data-4

2. Les dades del gràfic seleccionat s'extreuen per defecte a la primera cel·la del full ChartData.

presta atenció1Si esteu interessat en aquest complement, descarregueu la prova gratuïta de 60-dies.


Eines de productivitat recomanades

Pestanya d'Office

estrella d'or1 Porteu les pestanyes pràctiques a l'Excel i a un altre programari d'Office, igual que Chrome, Firefox i el nou Internet Explorer.

Kutools for Excel

estrella d'or1 Increïble! Incrementeu la productivitat en 5 minuts. No necessites cap habilitat especial, estalvieu dues hores cada dia.

estrella d'or1 300 Noves característiques per a Excel, Excel molt fàcil i potent:

  • Combina cel·les / files / columnes sense perdre dades.
  • Combina i consolida diverses fulles i llibres.
  • Comparar intervals, copiar diversos rangs, convertir text a data, unitat i conversió de divises.
  • Compte per colors, subtotals de paginació, classificació avançada i filtre súper,
  • Més Seleccioneu / Insereix / Suprimeix / Text / Format / Enllaç / Comentari / Llibres / Eines de full de càlcul ...

Tret de pantalla de Kutools per a 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!