Δημιουργήστε γραφήματα με VBA

Anonim

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

Ερώτηση): Χρειάζομαι επειγόντως έναν τρόπο για να φτιάξω αυτόματα έναν συγκεκριμένο τύπο γραφήματος, ας πούμε γράφημα γραμμών ή γράφημα στηλών. Τα δεδομένα είναι σε σταθερές μορφές. Μπορεί κάποιος να βοηθήσει;

Ακολουθεί η εικόνα των δεδομένων που έχουμε:

Πρέπει να ακολουθήσουμε τα παρακάτω βήματα για να ξεκινήσουμε τον επεξεργαστή VB

  • Κάντε κλικ στην καρτέλα Προγραμματιστής
  • Από την ομάδα κωδικών, επιλέξτε Visual Basic

Εισαγάγετε τον ακόλουθο κώδικα στην τυπική μονάδα

Sub VBAChart ()

ActiveSheet.Shapes.AddChart2 (201, xlColumnClustered). Επιλέξτε

ActiveChart.SetSourceData Πηγή: = Εύρος ("Sheet1! $ A $ 1: $ E $ 6")

Τέλος υπο

  • Καθώς τρέχουμε τη μακροεντολή. θα πάρουμε τον αυτόματο χάρτη. Ανατρέξτε παρακάτω στιγμιότυπο

Με αυτόν τον τρόπο, μπορούμε να δημιουργήσουμε αυτοματοποιημένα γραφήματα, χρησιμοποιώντας μακροεντολές.

Λήψη - Δημιουργία γραφημάτων με VBA - xlsm