1 Ανοίξτε το Microsoft Excel . 2
Κάντε κλικ στο " Εργαλεία ", " Macro " και στη συνέχεια κάντε κλικ στο " Visual Basic ". Αυτό θα ανοίξει το περιβάλλον προγραμματισμού VBA .
Εικόνων 3
Κάντε κλικ στο " Εισαγωγή ", " ενότητα " . Είστε τώρα σε μια λειτουργική μονάδα κώδικα προγραμματισμού
Η 4
Πληκτρολογήστε ή αντιγράψτε και επικολλήστε τον παρακάτω κώδικα στο εσωτερικό της μονάδας κώδικα : .
Sub dividenumbers ( )
Dim MyAnswer Όπως Integer
MyAnswer = 10/2
MsgBox ( MyAnswer )
End Sub
Ο κώδικας δημιουργεί μια διαδικασία ρουτίνας που ονομάζεται : dividenumbers , τότε χρήσεις η δήλωση Dim VBA για να δηλώσει μια μεταβλητή που ονομάζεται : MyAnswer . Αναθέτει τη διαίρεση των δύο αριθμών στη μεταβλητή MyAnswer , και , στη συνέχεια, χρησιμοποιεί τη συνάρτηση VBA MsgBox για να εμφανιστεί η απάντηση στην οθόνη . Ο κώδικας τελειώνει με τη VBA " End Sub " δήλωση.
5
Press " F5 " στο πληκτρολόγιό σας για να τρέξει το πρόγραμμα . Ένα πλαίσιο μηνύματος θα πρέπει να εμφανιστεί στην οθόνη με την απάντηση : . 5
Η
εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα