Αυτό το άρθρο θα δείξει πώς να χρησιμοποιήσετε ένα πλαίσιο κειμένου στο Excel VBA.
Το VBA έχει τη δυνατότητα να δημιουργεί φόρμες με τις οποίες μπορεί να αλληλεπιδρά ο χρήστης, όπως φόρμες τιμολογίου ή στοιχεία επικοινωνίας. Τα πλαίσια κειμένου είναι στοιχεία ελέγχου που μπορούν να χρησιμοποιηθούν σε αυτές τις φόρμες ή πλαίσια κειμένου μπορούν να δημιουργηθούν απευθείας μέσα στο ίδιο το Excel.
Δημιουργία πλαισίων κειμένου σε φόρμες VBA
Για να εισαγάγετε ένα πλαίσιο κειμένου σε μια φόρμα VBA, πρέπει πρώτα να δημιουργήσουμε τη φόρμα. Αυτό γίνεται στο VBE Editor.
Αρχικά, ανοίξτε το πρόγραμμα επεξεργασίας VBE στο Excel.
Για να εισαγάγετε μια νέα φόρμα χρήστη στον κωδικό σας, επιλέξτε το UserForm επιλογή από το μενού Εισαγωγή.
Μια νέα φόρμα χρήστη θα εμφανιστεί στο Project Explorer και θα εμφανίζεται στο παράθυρο κώδικα στα δεξιά.
Μπορείτε να μετονομάσετε τη φόρμα σας χρησιμοποιώντας το Ιδιότητες κουτί. Αυτό πρέπει να εμφανίζεται κάτω από το δικό σας Project Explorer.
Εάν είναι πόσο ορατό, πατήστε F4 ή κάντε κλικ Θέα, Παράθυρο ιδιοτήτων.
Κάντε κλικ στο Ονομα ιδιοκτησίας και μετονομάστε τη φόρμα σας.
Μπορούμε τώρα να αρχίσουμε να συμπληρώνουμε τη φόρμα μας με στοιχεία ελέγχου - το στοιχείο ελέγχου πλαισίου κειμένου είναι το πιο δημοφιλές στοιχείο ελέγχου μαζί με το στοιχείο ελέγχου ετικέτας.
Για να συμπληρώσουμε τη φόρμα με στοιχεία ελέγχου, πρέπει να ενεργοποιήσουμε την Εργαλειοθήκη.
Στο Μενού, επιλέξτε Προβολή> Εργαλειοθήκη.
Για να δημιουργήσετε ένα πλαίσιο κειμένου στη φόρμα σας, επιλέξτε το στοιχείο ελέγχου πλαίσιο κειμένου στην εργαλειοθήκη.
Σύρετε ένα σχήμα πλαισίου στη φόρμα με το ποντίκι σας, κρατώντας πατημένο το αριστερό κουμπί και, στη συνέχεια, αφήστε το κουμπί του ποντικιού.
Δεδομένου ότι αυτό είναι το πρώτο πλαίσιο κειμένου που δημιουργούμε, θα ονομάζεται TextBox1. Όπως και με τη φόρμα, μπορείτε να χρησιμοποιήσετε το παράθυρο Ιδιότητες για να μετονομάσετε το πλαίσιο κειμένου.
Μπορεί επίσης να χρειαστεί να δημιουργήσετε μια ετικέτα για το πλαίσιο κειμένου στη φόρμα. Αυτό γίνεται με ένα στοιχείο ελέγχου ετικέτας. Σύρετε τη φόρμα με τον ίδιο τρόπο όπως για ένα πλαίσιο κειμένου και, στη συνέχεια, μπορείτε να πληκτρολογήσετε το απαιτούμενο κείμενο εντός του στοιχείου ελέγχου ετικέτας π.χ.: Όνομα όπως φαίνεται παρακάτω.
Για να χρησιμοποιήσετε τη φόρμα εντός του κώδικα VBA, θα πρέπει να προσθέσουμε ένα κουμπί εντολών στη φόρμα. Αυτό γίνεται επιλέγοντας το στοιχείο ελέγχου κουμπιού εντολών στην εργαλειοθήκη και σύροντας το κουμπί στη φόρμα σας.
Στη συνέχεια, μπορείτε να συνεχίσετε να δημιουργείτε τη φόρμα σας χρησιμοποιώντας πλαίσια κειμένου, ετικέτες και κουμπιά εντολών, μετονομάζοντάς τα ανάλογα.
Γραφή κώδικα πίσω από φόρμες
Αφού δημιουργήσουμε τη φόρμα μας, πρέπει να γράψουμε κώδικα VBA για να εισαγάγουμε τις πληροφορίες στη φόρμα μας στο φύλλο εργασίας του Excel. Αυτός ο κωδικός ονομάζεται CBF (Κωδικός πίσω από φόρμες).
Στο VBE, κάντε διπλό κλικ στο κουμπί εντολών για να μεταβείτε στον κωδικό πίσω από το κουμπί.
Θα δημιουργηθεί μια υπορουτίνα για το συμβάν κλικ για το κουμπί. Μπορούμε να πληκτρολογήσουμε τον κωδικό VBA σε αυτήν τη ρουτίνα. Για παράδειγμα:
| 123456 | Private Sub cmdOK_Click ()Εύρος ("A1") = Me.txtFirstNameΕύρος ("A2") = Me.txtSurnameΕύρος ("A3") = Me.txtCellPhoneΞεφορτώστε ΜεΤέλος υπο |
Αυτή η ρουτίνα θα τοποθετήσει τις λεπτομέρειες που πληκτρολογούνται στα πλαίσια κειμένου στο Excel και στη συνέχεια θα κλείσει τη φόρμα.
Δημιουργία πλαισίων κειμένου σε ένα φύλλο εργασίας του Excel
Είναι επίσης δυνατό να δημιουργηθούν πλαίσια κειμένου μέσα στο υπολογιστικό φύλλο του Excel. Για να το κάνετε αυτό, πρέπει να έχετε ενεργοποιήσει την Κορδέλα προγραμματιστή.
Σημείωση: Εάν δεν βλέπετε την Κορδέλα προγραμματιστή, θα πρέπει να την ενεργοποιήσετε.
Στην Κορδέλα, επιλέξτε Προγραμματιστής> Εισαγωγή> Στοιχεία ελέγχου ActiveX> TextBox.
Κάντε κλικ και σύρετε στο φύλλο εργασίας του Excel για να σχεδιάσετε το πλαίσιο κειμένου στο φύλλο εργασίας στην επιθυμητή θέση. Αφήστε το κουμπί του ποντικιού για να ολοκληρώσετε τη σχεδίαση του πλαισίου κειμένου.
Το πλαίσιο κειμένου θα είναι σε Λειτουργία σχεδίασης. Σε αυτήν τη λειτουργία, μπορούμε να μεγεθύνουμε το πλαίσιο και να επιλέξουμε τις Ιδιότητες του πλαισίου κειμένου.
Κάνε κλικ στο Ιδιότητες κουμπί για εμφάνιση του παραθύρου ιδιοτήτων για το πλαίσιο κειμένου. Σε αυτό το παράθυρο, μπορούμε να αλλάξουμε μια ποικιλία ιδιοτήτων του πλαισίου κειμένου, όπως το όνομα του πλαισίου, το χρώμα του κειμένου, το φόντο ή το περίγραμμα, το στυλ περιγράμματος και η γραμματοσειρά που χρησιμοποιείται για το κείμενο στο πλαίσιο κειμένου για παράδειγμα.
Για να χρησιμοποιήσουμε το πλαίσιο κειμένου απευθείας στο Excel όπως το χρησιμοποιήσαμε στην παραπάνω μορφή VBA, χρειαζόμαστε έναν τρόπο επιστροφής των δεδομένων που πληκτρολογούνται στο πλαίσιο κειμένου στο φύλλο Excel. Αυτό μπορεί να γίνει προσθέτοντας ένα κουμπί εντολών ActiveX στο φύλλο εργασίας και χρησιμοποιώντας το click_event αυτού του κουμπιού εντολών για να επιστρέψετε τις πληροφορίες στο πλαίσιο κειμένου στο φύλλο Excel.
Στην Κορδέλα, επιλέξτε Προγραμματιστής> Εισαγωγή> Στοιχεία ελέγχου ActiveX> Κουμπί εντολών για να προσθέσετε ένα κουμπί εντολών στο φύλλο Excel σας. Ενεργοποιήστε το παράθυρο Ιδιότητες και αλλάξτε το όνομα του κουμπιού, τη λεζάντα του κουμπιού και τον Επιταχυντή του κουμπιού, όπως φαίνεται στην παρακάτω εικόνα.
Κάντε διπλό κλικ στο κουμπί για να μεταβείτε στο συμβάν κλικ VBA του κουμπιού και πληκτρολογήστε τον ακόλουθο κώδικα:
| 123 | Private Sub cmdOK_Click ()Εύρος ("A1") = Me.txtFirstNameΤέλος υπο |
Επιστρέψτε στο φύλλο εργασίας του Excel, βεβαιωθείτε ότι η λειτουργία σχεδίασης είναι απενεργοποιημένη και, στη συνέχεια, πληκτρολογήστε το δημιουργημένο πλαίσιο κειμένου.
Κάντε κλικ στο κουμπί εντολών για να επιστρέψετε το κείμενο στο Excel.
