VBA Sum Λειτουργία

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

Η συνάρτηση Sum προσθέτει δύο ή περισσότερους αριθμούς και επιστρέφει το αποτέλεσμα , το οποίο είναι ένα άλλο αριθμό. Άθροισμα είναι ένα από τα πολλά τους τύπους του Excel , μπορείτε να χρησιμοποιήσετε στα προγράμματα VBA . Αυτοί οι τύποι , η οποία εμφανίζει το Excel στο " Τύποι " καρτέλα του , είναι διαθέσιμες στην VBA μέσω της ιδιοκτησίας WorksheetFunctions του αντικειμένου Application , το οποίο αντιπροσωπεύει το Excel . Η σύνταξη των Sum απαιτεί το όνομα της συνάρτησης , μια παρένθεση και στη συνέχεια τη λίστα επιχείρημα . Μπορείτε να παρέχουν αυτή τη λίστα η οποία αποτελείται από όλους τους αριθμούς που θέλετε Sum να προσθέσει επάνω. Διαχωρίστε κάθε αριθμό με ένα κόμμα και υποδεικνύει το τέλος της λίστας των αριθμών πληκτρολογώντας μια παρένθεση.
Εικόνων Πρόγραμμα Δείγμα
Η

Μάθετε πώς να χρησιμοποιείτε τη λειτουργία VBA ποσό με εντάσσοντάς τον σε ένα σύντομο πρόγραμμα . Ξεκινήστε γράφοντας αυτό το πρόγραμμα ανοίγοντας το περιβάλλον ανάπτυξης VBA . Κάντε κλικ στην καρτέλα "Προγραμματιστής " του Excel και στη συνέχεια κάντε κλικ στο κουμπί " Visual Basic " για να ανοίξει το περιβάλλον . Ανοίξτε ένα παράθυρο για την εισαγωγή δηλώσεων VBA , κάνοντας διπλό κλικ στο " Αυτό το βιβλίο εργασίας " στον αριστερό τμήμα του παραθύρου του περιβάλλοντος . Πληκτρολογήστε το περίγραμμα ενός ρουτίνα που θα τρέξει τη συνάρτηση Sum . Μπορείτε να πληκτρολογήσετε "sub sumSomething ", για παράδειγμα , ορίζει την έναρξη αυτής της υπορουτίνας . Πληκτρολογήστε " End sub ​​" στην επόμενη γραμμή για να δείξει το τέλος της υπορουτίνας .

Η πάρει εισόδου
Η

Δώστε την είσοδο του προγράμματός σας χρειάζεται να τρέχει από χρησιμοποιώντας την εντολή InputBox VBA , η οποία ζητά από το χρήστη να εισάγετε δεδομένα και περνά τα δεδομένα στο πρόγραμμά σας . Πληκτρολογήστε τις δηλώσεις που εμφανίζονται παρακάτω για να εισάγετε InputBox στο πρόγραμμά σας VBA . Οι δηλώσεις αυτές ορίζουν μεταβλητές που θα κρατήσει τους αριθμούς του χρήστη του προγράμματος θέλει να συνοψίσω , ζητά από το χρήστη για αυτούς τους αριθμούς και εισάγει τους αριθμούς εισόδου στις μεταβλητές Number1 και Αριθμός2 .

Δημ. αριθμός1, αριθμός2 , resultNumber1 = InputBox ( " ? . Παρακαλώ πληκτρολογήστε τον πρώτο αριθμό που θέλετε να αθροίσετε " ) Αριθμός2 = InputBox ( " Παρακαλώ πληκτρολογήστε το δεύτερο αριθμό που θέλετε να αθροίσετε " )
εικόνων αθροίζοντας
Η <. p> Τοποθετήστε τον τύπο Sum στο πρόγραμμά σας VBA πληκτρολογώντας το όνομα " WorksheetFunction " ακολουθούμενο από ένα χρονικό διάστημα . Όταν πληκτρολογείτε το χρονικό διάστημα , VBA θα εμφανίσει μια λίστα με τις λειτουργίες φύλλου εργασίας , μπορείτε να εισάγετε στο πρόγραμμά σας . Κάντε κλικ στο " Sum" στοιχείο από τη λίστα για να εισάγετε τη φόρμουλα στο πρόγραμμά σας . Αυτό είναι ό, τι δήλωση Sum σας πρέπει να μοιάσει .

Αποτέλεσμα = WorksheetFunction.Sum ( Number1 , Αριθμός2 )

Ανακοίνωση για τη μεταβλητή " αποτέλεσμα " σε αυτή τη δήλωση . Να είστε βέβαιος ότι έχετε δηλώσει ότι μεταβλητή σε μια δήλωση Dim , μαζί με τις μεταβλητές Number1 και Αριθμός2 .
Εικόνων εξόδου
Η

Εισάγετε μια πρόταση εξόδου που επιστρέφει το αποτέλεσμα της Χημικός τύπος . Συνάρτηση MsgBox VBA προσφέρει μια γρήγορη λύση για την εμφάνιση σύντομες δηλώσεις εξόδου . Πληκτρολογήστε τη δήλωση αυτή στο πρόγραμμά σας VBA για να εμφανιστεί το αποτέλεσμα από τον τύπο Sum ως εξής :

MsgBox " Το άθροισμα των αριθμών που έχετε εισάγει είναι " και να οδηγήσει
εικόνων Εκτέλεση πρόγραμμα
Η

Εκτελέστε το πρόγραμμα άθροισης σας VBA κάνοντας κλικ σε μία από τις δηλώσεις του και , στη συνέχεια, κάνοντας κλικ στο "Run" εντολή στο μενού Run . Απαντήστε εμφανίζει το πρόγραμμα πληκτρολογώντας δύο αριθμούς . Το πρόγραμμά σας θα τρέξει τον τύπο αθροίσματος σε αυτούς τους αριθμούς και να επιστρέψει αποτέλεσμα του τύπου για να σας με τη δήλωση MsgBox .
Η
εικόνων