1 Ανοίξτε το Microsoft Excel . 2
Κάντε κλικ στο " Εργαλεία ", " Macro " και στη συνέχεια " Visual Basic ". Αυτό θα ανοίξει το πρόγραμμα επεξεργασίας VBA .
Εικόνων 3
Κάντε κλικ στο " Εισαγωγή" και " UserForm . " Αυτό θα τοποθετήσει ένα UserForm στην οθόνη σας , συμπεριλαμβανομένων εργαλειοθήκη VB που περιέχει τα στοιχεία ελέγχου για να χρησιμοποιήσετε το UserForm .
Η 4
Προσθέστε το αντικείμενο ListView πάνω εργαλειοθήκη κάνοντας κλικ στο " εργαλείο " και " Έλεγχοι προσθήκη . " Αυτό ανοίγει το παράθυρο ελέγχου ActiveX . Μετακινηθείτε προς τα κάτω και επιλέξτε " Microsoft Listview Ελέγχου " και κάντε κλικ στο "OK". Αυτό θα προσθέσει το αντικείμενο ListView στην εργαλειοθήκη .
5
Επιλέξτε το " ListView " από την εργαλειοθήκη και τραβήξτε το επάνω UserForm σας .
Η 6
διπλό κλικ στο UserForm . Αυτό θα ανοίξει το παράθυρο κώδικα της UserForm του .
Η 7
Επισημάνετε και επιλέξτε όλο το περιεχόμενο μέσα στο παράθυρο κώδικα της φόρμας και πατήστε "Delete" στο πληκτρολόγιο σας .
8
τύπου ή αντιγραφή και επικόλληση του παρακάτω κώδικα στη λειτουργική μονάδα κώδικα :
Private Sub UserForm_Activate ( )
Με ListView1.ListItems
Add.Text = " Θέση "
<. p> . Add.Text = " Θέση "
. Add.Text = " Θέση "
. Add.Text = " Θέση "
. Add.Text = " Θέση "
. Add.Text = " Θέση "
. Add.Text = " Θέση "
. Add.Text = " Θέση "
End With
End Sub
Ο κώδικας προσθέτει ένα αντικείμενο ListView σε ένα UserForm και στη συνέχεια χρησιμοποιεί τη μέθοδο της listitems ListView να το συμπληρώσετε με διάφορα αντικείμενα . Ο κωδικός εισάγεται στη διαδικασία συμβάντος ενεργοποίηση του UserForm έτσι ο κώδικας συμπληρώνει το αντικείμενο ListView αμέσως στην εκτέλεση του προγράμματος
Η
9 Πατήστε το πλήκτρο " F5 " στο πληκτρολόγιό σας για να τρέξετε το πρόγραμμά σας ? . Θα πρέπει να έχετε ένα UserForm στην οθόνη σας . Θα πρέπει να δείτε το αντικείμενο ListView σας γεμάτη με μια σειρά από αντικείμενα .
Η
εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα