Τα cookies μάς βοηθούν να παρέχουμε τις υπηρεσίες μας. Με τη χρήση των υπηρεσιών μας, συμφωνείτε με τη χρήση των cookies.
Συμβουλή: Άλλες γλώσσες μεταφράζονται από την Google. Μπορείτε να επισκεφθείτε το English έκδοση αυτής της σύνδεσης.
Σύνδεση
x
or
x
x
Κανω ΕΓΓΡΑΦΗ
x

or

Πώς να εξαγάγετε δεδομένα από γράφημα ή γράφημα στο Excel;

doc-εκχύλισμα-γράφημα-δεδομένα-1
Στο Excel, συνήθως χρησιμοποιούμε το γράφημα για την εμφάνιση δεδομένων και την τάση για πιο ξεκάθαρη προβολή, αλλά μερικές φορές, ίσως το γράφημα είναι ένα αντίγραφο και δεν έχετε τα αρχικά δεδομένα του χάρτη όπως φαίνεται παρακάτω. Σε αυτήν την περίπτωση, μπορεί να θέλετε να εξαγάγετε τα δεδομένα από αυτό το γράφημα. Τώρα αυτό το σεμινάριο μιλά για την εξαγωγή δεδομένων από ένα γράφημα ή ένα γράφημα.
Εξαγωγή δεδομένων από το γράφημα με VBA

Πλοήγηση--Αυτόματο κείμενο (προσθέστε τα συνήθως χρησιμοποιούμενα διαγράμματα στο pte.Then AutoText ένα κλικ για να το εισαγάγετε όταν χρειάζεστε.)

Excel προσθέστε εργαλεία για την εισαγωγή του πίνακα καταρράκτη οποιαδήποτε στιγμή

arrow μπλε δεξιά φούσκα Εξαγωγή δεδομένων από το γράφημα με VBA


1. Πρέπει να δημιουργήσετε ένα νέο φύλλο εργασίας και να το μετονομάσετε ως Διάγραμμα. Δείτε το στιγμιότυπο οθόνης:

Kutools για το Excel, με περισσότερα από 120 εύχρηστες λειτουργίες του Excel, να βελτιώσει την αποτελεσματικότητα της εργασίας και να εξοικονομήσει χρόνο εργασίας.

doc-εκχύλισμα-γράφημα-δεδομένα-5

2. Στη συνέχεια, επιλέξτε το διάγραμμα από το οποίο θέλετε να εξαγάγετε δεδομένα και πατήστε Alt + F11 ταυτόχρονα, και α Microsoft Visual Basic για εφαρμογές παράθυρο σκάει.

3. κλικ Κύριο θέμα > Μονάδα μέτρησης, στη συνέχεια επικολλήστε κάτω από τον κώδικα VBA στο popping Μονάδα μέτρησης παράθυρο.

VBA: Εξαγωγή δεδομένων από το γράφημα.

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. Στη συνέχεια κάντε κλικ στο κουμπί τρέξιμο για να εκτελέσετε το VBA. Δείτε το στιγμιότυπο οθόνης:

doc-εκχύλισμα-γράφημα-δεδομένα-2

Στη συνέχεια μπορείτε να δείτε τα δεδομένα που εξάγονται σε Διάγραμμα σεντόνι.

doc-εκχύλισμα-γράφημα-δεδομένα-3

Εύρος εξαγωγής ως γραφικό

Kutools' Εύρος εξαγωγής ως γραφικό αποσκοπεί να αποθηκεύσει ή να εξάγει ένα κελί επιλογής ως πολλαπλές γραφικές μορφές.
doc ως εύρος εικόνας

Συμβουλή:

1. Μπορείτε να διαμορφώσετε τα κελιά όπως χρειάζεστε.

doc-εκχύλισμα-γράφημα-δεδομένα-4

2. Τα δεδομένα του επιλεγμένου διαγράμματος εξάγονται στο πρώτο κελί του φύλλου ChartData στην προεπιλογή.

pay attention1Εάν ενδιαφέρεστε για αυτό το πρόσθετο, κάντε λήψη της δωρεάν δοκιμής 60 ημερών.


Συνιστώμενα εργαλεία παραγωγικότητας

Καρτέλα Office

χρυσό star1 Φέρτε χρήσιμες καρτέλες στο Excel και άλλο λογισμικό του Office, όπως το Chrome, το Firefox και ο νέος Internet Explorer.

Kutools για το Excel

χρυσό star1 Φοβερο! Αυξήστε την παραγωγικότητά σας σε λεπτά 5. Δεν χρειάζεστε ειδικές δεξιότητες, εκτός από δύο ώρες κάθε μέρα!

χρυσό star1 300 Νέες δυνατότητες για Excel, Κάντε το Excel πολύ εύκολο και ισχυρό:

  • Συγχώνευση κελιών / σειρών / στηλών χωρίς απώλεια δεδομένων.
  • Συνδυασμός και ενοποίηση πολλών φύλλων και βιβλίων εργασίας.
  • Συγκρίνετε Περιοχές, Αντιγραφή Πολλαπλών Εύρους, Μετατροπή Κειμένου σε Ημερομηνία, Μετατροπή μονάδας και νομίσματος.
  • Καταμέτρηση κατά Χρώματα, Υποσύνολα σελίδας, Σύνθετη Ταξινόμηση και Σούπερ Φίλτρο,
  • Περισσότερα Επιλογή / Εισαγωγή / Διαγραφή / Κείμενο / Μορφή / Σύνδεσμος / Σχόλιο / Βιβλία εργασίας / Φύλλα εργασίας Εργαλεία ...

Εικόνα του Kutools για το 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!