Περιεχόμενο
Η εκμάθηση της λειτουργίας "Εισαγωγή" στη VBA για το Excel είναι το πρώτο βήμα για τη δημιουργία προγραμμάτων με αυτό το εργαλείο. Το "Input Box" είναι μια εύκολη εισαγωγή στο εγχειρίδιο γραφής των προγραμμάτων VBA, καθώς απαιτεί μόνο ένα επιχείρημα, αλλά εκτελεί τη ζωτική λειτουργία της λήψης εισόδου χρήστη. Σκεφτείτε επίσης να μάθετε για τη λειτουργία "MsgBox", καθώς ο ρόλος της, δηλαδή η εμφάνιση μηνυμάτων στους χρήστες, είναι το συμπλήρωμα του "Input Box".
Σκοπός
Η λειτουργία "Εισαγωγή" σάς ζητά να εισάγετε δεδομένα και να τα λάβετε. Για παράδειγμα, ένα "Input Box" μπορεί να ζητήσει από ένα χρήστη να εισαγάγει την ηλικία ενός ατόμου για να το αποθηκεύσει σε έναν πίνακα που ονομάζεται "Λίστα Γενεθλίων" σε ένα φύλλο εργασίας του Excel.
Επιχειρήματα
Ένα "πλαίσιο εισόδου" παίρνει αρκετά επιχειρήματα, αλλά μόνο ένα από αυτά είναι απαραίτητο: το κείμενο που ζητάει από τον χρήστη να εισάγει δεδομένα. Τα προαιρετικά επιχειρήματα περιλαμβάνουν τον τίτλο του πλαισίου διαλόγου και το προεπιλεγμένο όρισμα. Μπορείτε να βάλετε το κουτί σε μια συγκεκριμένη θέση χρησιμοποιώντας τα επιχειρήματα "Xpos" και "Ypos".
Τιμή επιστροφής
Το "InputBox" επιστρέφει μια συμβολοσειρά κειμένου, η οποία συνήθως σημαίνει ότι πρέπει να δηλώσετε μια μεταβλητή για να την λάβετε. Αυτή η δήλωση μπορεί να λάβει μία από τις δύο μορφές. Το πρώτο δεν καθορίζει έναν τύπο τιμής (για παράδειγμα, μπορείτε να πληκτρολογήσετε "Dim value Return" ή να αναφέρετε τον τύπο της μεταβλητής με μια δήλωση τύπου "Dim value Return String"). Γενικά, συνιστούμε να χρησιμοποιήσετε έναν πιο συγκεκριμένο τύπο, έτσι ώστε η VBA να μπορεί να συλλάβει τυχόν σφάλματα που σχετίζονται με τον τύπο, για παράδειγμα, όταν προσπαθείτε να βάλετε έναν αριθμό σε μια μεταβλητή "String".
Δείγμα προγράμματος
Δοκιμάστε ένα δείγμα προγράμματος που ενσωματώνει το "Input Box" με το Excel. Κάντε κλικ στο κουμπί "Visual Basic" στην καρτέλα "Ανάπτυξη Excel" για να ανοίξετε το περιβάλλον προγραμματισμού VBA. Αντιγράψτε τον ακόλουθο κώδικα:
Δημόσια Sub GetEmailAdr () Dim str_email Ως String (InStr (str_email, "@") = 0) str_email = InputBox ("Εισαγάγετε μια έγκυρη διεύθυνση ηλεκτρονικού ταχυδρομείου.
Επικολλήστε τον κώδικα στο παράθυρο και εκτελέστε το πρόγραμμα πιέζοντας το πλήκτρο "F5". Αυτό το πρόγραμμα θα σας προτρέψει για μια είσοδο χρήστη, θα εκτελέσει έναν απλό έλεγχο σε αυτό και θα βάλει την τιμή επιστροφής σε ένα κελί αν είναι έγκυρη. Διαφορετικά, το πρόγραμμα θα ζητήσει από τον χρήστη μια άλλη τιμή.
Εναλλακτικές λύσεις και πλεονεκτήματα
Το "Input Box" είναι ένας από τους πολλούς τρόπους για να εισάγετε τους χρήστες στο Excel. Μπορείτε επίσης να χρησιμοποιήσετε ένα στοιχείο φύλλου εργασίας ή ένα στοιχείο ελέγχου "Κείμενο" για να το καταγράψετε. Επειδή το Input Box υποστηρίζει την εισαγωγή κειμένου, δεν είναι η καλύτερη επιλογή για ερωτήσεις "Ναι / Όχι". Ωστόσο, ένα πλεονέκτημα της λειτουργίας είναι ότι δεν χρειάζεται να δημιουργήσετε μια ειδική φόρμα για να την χρησιμοποιήσετε, σε αντίθεση με άλλα στοιχεία ελέγχου VBA. Ένας έλεγχος λίστας πλαισίων, για παράδειγμα, χρειάζεται μια φόρμα χρήστη που πρέπει να δημιουργήσετε ή ένα φύλλο εργασίας στο οποίο ο έλεγχος θα καταλαμβάνει χώρο. Το "κουτί εισόδου" δεν θα πάρει χώρο: θα εμφανιστεί, θα λάβει την είσοδο του χρήστη και θα εξαφανιστεί, η οποία είναι πολύ διακριτική.
