Πώς να Ισοπαλία Διανύσματα στο Excel Macros

Microsoft Excel είναι ένα από τα πιο ισχυρά προγράμματα λογιστικό φύλλο , και είναι χρήσιμο για μια τεράστια ποικιλία των δραστηριοτήτων από την οικονομική ανάλυση για τα έργα της επιστήμης . Ωστόσο , οι περισσότεροι άνθρωποι σκέφτονται του Excel , όπως περιορίζεται στο χειρισμό δικτύων των τύπων , δηλαδή , παραδοσιακή λειτουργικότητα φύλλο . Αλλά Visual Basic scripting Excel καθιστά εύκολο να κάνουμε ακόμη περισσότερα από αυτό . Με VB , μπορείτε να σχεδιάσετε οποιοδήποτε σχήμα θέλετε στο υπολογιστικό φύλλο , και να τις χρησιμοποιήσετε για να δημιουργήσετε σχέδια , διαγράμματα και άλλα γραφικά για να βοηθήσει απεικονίσει φύλλο σας . Τα πράγματα που θα χρειαστείτε για Microsoft Excel 97 ή νεότερη έκδοση
Η Εμφάνιση Περισσότερες οδηγίες
Η

1 Ανοίξτε το Microsoft Excel . Εάν έχετε το Excel 2007 ή αργότερα , πηγαίνετε στο "Προβολή" καρτέλα στην κορδέλα και κάντε κλικ στο " Μακροεντολές "? Αλλιώς , κάντε κλικ στο μενού " Εργαλεία" και επιλέξτε " Μακροεντολές " . Πρέπει να εμφανιστεί το παράθυρο διαλόγου Macro . 2

Πληκτρολογήστε ένα όνομα μακροεντολής και κάντε κλικ στο " Δημιουργία " . Αυτό θα ανοίξει το πρόγραμμα επεξεργασίας της Visual Basic εφαρμογές με ένα νέο κενό υπορουτίνα που εμφανίζεται στην οθόνη .
Εικόνων 3

Καθορίστε τη συντεταγμένες X και Y θα θέλατε να χρησιμοποιήσετε για την αρχή και το τέλος σας φορέα. Η γωνία επάνω αριστερή πλευρά του υπολογιστικού φύλλου είναι στο ( 0 , 0 ) , και τα Χ και Υ αύξηση καθώς πηγαίνετε δεξιά και προς τα κάτω , αντίστοιχα . Βάλτε αυτές τις τιμές σε μεταβλητές , όπως αυτό :

start_x = 0start_y = 0end_x = 100end_y = 100

Οι τιμές αυτές θα σχεδιάσετε μια διαγώνια γραμμή στην επάνω αριστερή γωνία του υπολογιστικού φύλλου . Μπορεί να χρειαστεί να πειραματιστείτε με διαφορετικούς αριθμούς για να πάρει τη γραμμή ακριβώς εκεί που θέλετε
Η 4

Προσθήκη κώδικα για να επιστήσει την ίδια τη γραμμή : .
Γραμμή

= Sheet1.Shapes.AddLine ( start_x , start_y , end_x , end_y )
5

Προσθήκη κώδικα για να προσθέσετε ένα βέλος στο τέλος της γραμμής , για να φανεί σαν ένα φορέα :

line.Line.EndArrowheadStyle = MsoArrowheadStyle.msoArrowheadTriangle

6

Κλείστε το πρόγραμμα επεξεργασίας της Visual Basic και να ανοίξει το παράθυρο διαλόγου Μακροεντολή ( βλ. Βήμα 1 ) . Κάντε κλικ στο κουμπί macro σας και κάντε κλικ στο " Run" . Θα πρέπει να εμφανιστεί η γραμμή σας .
Η
εικόνων