Σε αυτό το άρθρο, θα μάθουμε πώς να κάνουμε τη συνάρτηση που ορίζεται από το χρήστη για να εξάγει το κείμενο μόνο από τη συμβολοσειρά μέσω VBA.
Λειτουργία καθορισμένη από το χρήστη: Το Microsoft Excel σάς επιτρέπει να δημιουργήσετε τη δική σας συνάρτηση σύμφωνα με τις απαιτήσεις, την αποκαλούμε Συνάρτηση καθορισμένη από το χρήστη. Και, μπορούμε να χρησιμοποιήσουμε συναρτήσεις που ορίζονται από το χρήστη, όπως άλλες λειτουργίες που λειτουργούν στο Excel.
Ας καταλάβουμε με ένα πολύ απλό παράδειγμα:
Έχουμε μια σειρά συμβολοσειρών, από τις οποίες θέλουμε να ανακτήσουμε μόνο την τιμή κειμένου.
Για να ανακτήσουμε μόνο κείμενο, θα δημιουργήσουμε τον κωδικό VBA. Μέσω αυτού του κώδικα μπορούμε να ανακτήσουμε το κείμενο από οποιοδήποτε μέρος του κελιού. Δείτε την παρακάτω διαδικασία και τον κώδικα θα καταλάβετε πόσο εύκολο είναι αυτό:
- Ανοίξτε τη σελίδα VBA πατήστε το πλήκτρο Alt+F11
- Εισαγάγετε μια ενότητα
- Γράψτε τον παρακάτω κωδικό:
Λειτουργία TextVba (καταχώριση) Για I = 1 Προς Len (καταχώριση) ThisChar = Mid (καταχώριση, I, 1) Επιλογή Περίπτωσης Asc (ThisChar) Περίπτωση 48, 49, 50, 51, 52, 53, 54, 55, 56, 57 , 58 Περίπτωση αλλού TextVba = TextVba & ThisChar Τέλος Επιλέξτε Επόμενο i Λειτουργία Τέλος
Επεξήγηση κώδικα: Πρώτον, δώσαμε το όνομα της συνάρτησης (TextVba). Και, στη συνέχεια, δώσαμε το μήκος της συμβολοσειράς, στη συνέχεια χρησιμοποιήσαμε τη συνάρτηση Asc (αυτή είναι η συνάρτηση κώδικα). Στη συνέχεια, ορίσαμε την υπόθεση. Τώρα, έχουμε ορίσει την κατάσταση του TextVba και, στη συνέχεια, Κλείσιμο της λειτουργίας Select.
- Τώρα θα χρησιμοποιήσουμε τη συνάρτηση στο φύλλο Excel
- Μεταβείτε στο Φύλλο Excel
- Στο κελί Β2 πληκτρολογήστε τον τύπο
- = TextVba (A2), πατήστε Enter
- Η λειτουργία θα επιστρέψει μόνο κείμενο
Με αυτόν τον τρόπο, μπορούμε να δημιουργήσουμε μια λειτουργία που ορίζεται από το χρήστη και να εξοικονομήσουμε χρόνο από τις κανονικές δραστηριότητες.
Αν σας άρεσαν τα ιστολόγια μας, μοιραστείτε το με τους φίλους σας στο Facebook. Επίσης, μπορείτε να μας ακολουθήσετε στο Twitter και το Facebook.
Θα θέλαμε πολύ να σας ακούσουμε, ενημερώστε μας πώς μπορούμε να βελτιώσουμε, να συμπληρώσουμε ή να καινοτομήσουμε το έργο μας και να το κάνουμε καλύτερο για εσάς. Γράψτε μας στον ιστότοπο email
