1 Ανοίξτε το Microsoft Word. 2
Κάντε κλικ στο " Εργαλεία ", " Macro " και στη συνέχεια κάντε κλικ στο " Visual Basic ". Αυτό θα ανοίξει το περιβάλλον προγραμματισμού VBA .
Εικόνων 3
Κάντε κλικ στο " Εισαγωγή" και " UserForm . " Αυτό θα τοποθετήσει ένα UserForm στην οθόνη σας , συμπεριλαμβανομένων εργαλειοθήκη VBA που περιέχει τα στοιχεία ελέγχου για να χρησιμοποιήσετε το UserForm .
Η
4 Επιλέξτε το " ComboxBox " από την εργαλειοθήκη και τραβήξτε το επάνω UserForm σας .
5
κάντε διπλό κλικ στο UserForm . Αυτό θα ανοίξει το παράθυρο κώδικα της UserForm του .
Η 6
Επισημάνετε και επιλέξτε όλο το περιεχόμενο μέσα στο παράθυρο κώδικα της φόρμας και πατήστε "Delete" στο πληκτρολόγιο σας .
Η 7
Τύπος ή να αντιγράψετε και να επικολλήσετε τον ακόλουθο κώδικα στη λειτουργική μονάδα κώδικα :
Private Sub UserForm_Activate ( )
Με ComboBox1 ' αυτό φορτώνει το combo
AddItem "είδος"
.
. AddItem "είδος"
. AddItem "είδος"
. AddItem "είδος"
. AddItem "είδος"
. AddItem " Θέση "
. AddItem " είδος "
. AddItem " είδος "
End With
End Sub
Ο κωδικός προσθέτει ένα Σύνθετο πλαίσιο αντικειμένου σε μια UserForm , και στη συνέχεια, χρησιμοποιεί τη μέθοδο της AddItem σύνθετο πλαίσιο για να το συμπληρώσετε με διάφορα αντικείμενα . Ο κωδικός εισάγεται στη διαδικασία συμβάντος ενεργοποίηση του UserForm έτσι ο κώδικας συμπληρώνει το σύνθετο πλαίσιο αμέσως στην εκτέλεση του προγράμματος
8
Πατήστε το πλήκτρο " F5 " στο πληκτρολόγιό σας για να τρέξετε το πρόγραμμά σας ? . Θα πρέπει να έχετε ένα userform στην οθόνη σας . Κάντε κλικ στο αναπτυσσόμενο βέλος στο σύνθετο πλαίσιο , και θα πρέπει να δείτε τη λίστα των στοιχείων .
Η
εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα