Excel VBA Ελέγχου Tutorial

δυνατότητες του Microsoft Excel ενισχυθεί σε μεγάλο βαθμό με τη χρήση της Visual Basic script , το οποίο σας επιτρέπει να προσαρμόσετε το προεπιλεγμένο εργαλεία του Excel με τις συγκεκριμένες ανάγκες του έργου σας . Χρησιμοποιώντας προσαρμοσμένες φόρμες χρήστη , με τους ελέγχους να λαμβάνουν είσοδο του χρήστη , σας δίνει τον πλήρη έλεγχο πάνω από το χρήστη την εισαγωγή δεδομένων του Excel . Μπαίνοντας στο παρακάτω πρόγραμμα θα σας δείξει πώς να χρησιμοποιούν διάφορες Visual Basic controls.Start το έργο με το άνοιγμα του Excel και εισάγοντας το Visual Basic IDE ( ολοκληρωμένο περιβάλλον ανάπτυξης ) . Εισάγετε τον IDE με alt - F11 . Τοποθετήστε τα στοιχεία ελέγχου
Η

Στο παράθυρο του IDE είναι σχεδιαστής ( View > Object ) , drag and drop των ελέγχων από την εργαλειοθήκη σε μια φόρμα χρήστη ως εξής :

Τοποθετήστε ένα στοιχείο ελέγχου πλαισίου στη φόρμα . Στο παράθυρο διαλόγου Ιδιότητες , αλλάξτε τη λεζάντα της « Οικογενειακή κατάσταση ». Με το στοιχείο ελέγχου πλαισίου επιλεγμένη, σύρετε δύο κουμπιά επιλογής μέσα στο στοιχείο ελέγχου πλαισίου . Σύρετε δύο ετικέτες μέσα στο πλαίσιο , το καθένα με το αριστερό του ένα κουμπί επιλογής . Δώστε τις ετικέτες τις λεζάντες " Παντρεμένος " και " Single".

Σύρετε ένα πλαίσιο λίστας κάτω από το πλαίσιο και τα κουμπιά επιλογής του . Σύρετε μια ετικέτα , η οποία θα πρέπει αυτομάτως να ονομαστεί Label3 , κάτω από το πλαίσιο λίστας . Πληκτρολογήστε " Απάντηση στην ερώτηση ασφαλείας , " για τη λεζάντα του . Στα δεξιά της Label3 σύρετε ένα πλαίσιο κειμένου . Σύμφωνα με το πλαίσιο κειμένου σύρετε ένα κουμπί και να της δώσει τη λεζάντα " Αποστολή". Τέλος , σύρετε μια ετικέτα , η οποία θα πρέπει να ονομαστεί Label4 , στα δεξιά του πλαισίου ελέγχου . Κάντε κενό λεζάντα της .

Οι δράσεις που μόλις τραβήξατε δημιούργησε μια τυπική μορφή που συλλέγει δεδομένα από έναν υποψήφιο νέο πελάτη . Θα χρησιμοποιήσει τώρα τη Visual Basic για να μεταφέρετε τα δεδομένα του πελάτη από τους ελέγχους σε ένα φύλλο εργασίας του Excel .
Εικόνων Δημιουργία κώδικα για το Έντυπο
Η

διπλό κλικ στη φόρμα για να εισάγετε το παράθυρο κώδικα , και να επιλέξετε αυτά τα στοιχεία από τις δύο drop - down boxes κοντά στην κορυφή του παραθύρου κώδικα : UserForm και Προετοιμασία . Ο IDE θα δημιουργήσει ένα κενό Προετοιμασία sub . Μέσα σε αυτό το sub , εισάγετε αυτόν τον κωδικό , ο οποίος συμπληρώνει το πλαίσιο λίστας, όταν ξεκινά το πρόγραμμα :

ListBox1.List = Array ( " Ποιο είναι το αγαπημένο σας ταινία; " , " Σε ποια πόλη γεννηθήκατε; " , " Τι είναι ο ήχος του ενός χεριού παλαμάκια ; " )
Όπως μπορείτε έκανε για Αρχικοποίηση υπορουτίνα της φόρμας χρήστη , να δημιουργήσει κενό υπορουτίνες για τα κουμπιά επιλογής " Κάντε κλικ γεγονότα , χρησιμοποιώντας κουτιά drop-down του παραθύρου κώδικα του . Στα Πατήστε γεγονότα τόσο optionButton1 και 2 , πληκτρολογήστε τον παρακάτω κώδικα : " . Συζυγική " Αυτό είναι το όνομα της συνάρτησης που θα γράψει τώρα :

Σε ένα κενό τμήμα του παραθύρου κώδικα , να δημιουργήσει τη συζυγική λειτουργίας :

Private Sub συζυγική ( ) « Ποια επιλέχθηκε κουμπί Εάν OptionButton1.Value = True ThenLabel4.Caption = " παντρεμένος " ElseLabel4.Caption = " single" End If

End Sub

Η Μεταφέρετε το έντυπο δεδομένων στο φύλλο εργασίας

Δημιουργήστε το κενό υπορουτίνα για το κουμπί εντολής συμβάν Click χρησιμοποιώντας κουτιά drop-down του παραθύρου κώδικα , καθώς και το καταγράφουν στο εν λόγω υπορουτίνα :

Range ( " a1 " ) = Label4.CaptionRange ( " b1 " ) = ListBox1.ValueRange ( " c1 " ) = TextBox1.Value

ο κωδικός αυτός μεταφέρει τα δεδομένα της φόρμας στο φύλλο εργασίας .

Εισάγετε το τελευταίο κομμάτι του κώδικα , μια νέα υπορουτίνα που εμφανίζει τη φόρμα σας :

ShowForm Public Sub ( ) UserForm1.Show

End Sub

Επιστροφή στο Excel ( Alt - F11 ) και να εκτελέσετε μακροεντολή ( Developer σας > μακροεντολές , ShowForm ) . Εισάγετε τα δεδομένα στη φόρμα , πατήστε το κουμπί του , και να παρακολουθήσετε το φύλλο εργασίας λαμβάνουν τις αξίες της φόρμας .
Η
εικόνων