1 Ανοίξτε το Microsoft Excel και να φορτώσεις μια ήδη υπάρχουσα ή νέο υπολογιστικό φύλλο . Στο Excel 2007 , κάντε κλικ στην κορδέλα του έργου και στη συνέχεια κάντε κλικ στο κουμπί " Visual Basic" . Σε παλαιότερες εκδόσεις του Excel , κάντε κλικ στο μενού "Εργαλεία" και στη συνέχεια κάντε κλικ στο κουμπί "Macro . « Από αυτό το μενού , κάντε κλικ στο κουμπί " Επεξεργασία Visual Basic . " 2
Κάντε διπλό κλικ στο " Βιβλίο εργασίας εικονίδιο " στο αριστερό στο παράθυρο παράθυρο . Αυτό ανοίγει ένα παράθυρο επεξεργασίας VBA . Στο αναπτυσσόμενο πλαίσιο , όπου έχει επιλεγεί " δηλώσεις " , αλλάξτε την σε "Βιβλίο εργασίας . " Αυτό δημιουργεί μια νέα λειτουργία που ενεργοποιείται όταν το βιβλίο εργασίας ανοιχτεί ονομάζεται " Workbook_Open ( ) . « Για αυτό το παράδειγμα , η MsgBox θα να προγραμματιστεί να εμφανίζεται όταν ο χρήστης ανοίγει το βιβλίο εργασίας .
εικόνων 3
Εισάγετε MsgBox " Hello World " στη λειτουργία νεοσυσταθείσα . Αυτός είναι ο τρόπος για την εμφάνιση πληροφοριών στον χρήστη. Το πλαίσιο μηνύματος που εμφανίζεται είναι καθαρά ενημερωτικό και δεν βρει μια απάντηση . Ο χρήστης κάνει κλικ στο κουμπί "OK" και το παράθυρο διαλόγου εξαφανίζεται .
Η 4
Ανάκτηση μια απάντηση από το χρήστη με την ανάθεση το πλαίσιο μηνύματος σε μια μεταβλητή . Παρακάτω είναι ο κώδικας για να ανακτήσετε μια απάντηση : " . Απάντηση" Answer = MsgBox ( " ; Θέλετε να συνεχίσετε » , vbYesNo ) Η απάντηση είναι ένα ή μηδέν και να αποθηκεύονται σε Η vbYesNo είναι μια σταθερά , και δίνει εντολή το παράθυρο διαλόγου MsgBox για να εμφανιστεί ένα και το κουμπί " Ναι " " Όχι " . Η απάντηση μπορεί να χρησιμοποιηθεί αργότερα στον κώδικα για να προσδιορίσει πώς η εφαρμογή θα λειτουργήσει.
5
Αποθηκεύστε το αρχείο και κλείστε το βιβλίο εργασίας . Ανοίξτε το βιβλίο εργασίας και πάλι να δοκιμάσετε τον κώδικα . Μόλις τα φορτία του βιβλίου εργασίας , σας δίνεται ένα παράθυρο διαλόγου με το κείμενο που κωδικοποιούνται στη συνάρτηση MsgBox .
Η
εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα