Χρησιμοποιήστε την ιδιότητα WorksheetFunction στο Excel VBA για πρόσβαση στο VLOOKUP λειτουργία. Το μόνο που χρειάζεστε είναι μια γραμμή κωδικού.
Κατάσταση:
1. Τοποθετήστε ένα κουμπί εντολών στο φύλλο εργασίας σας και προσθέστε την ακόλουθη γραμμή κώδικα:
Εύρος ("H3"). Value = WorksheetFunction.VLookup (Range ("H2"), Range ("B3: E9"), 4, False)
Όταν κάνετε κλικ στο κουμπί εντολών στο φύλλο εργασίας, το Excel VBA χρησιμοποιεί τη συνάρτηση VLOOKUP για να αναζητήσει το μισθό του ID 53 και τοποθετεί το αποτέλεσμα στο κελί H3.
Σημείωση: επισκεφθείτε τη σελίδα μας σχετικά με τη λειτουργία VLOOKUP για να μάθετε περισσότερα σχετικά με αυτήν τη συνάρτηση Excel.
Εάν η συνάρτηση VLOOKUP δεν μπορεί να βρει αντιστοιχία, το Excel VBA επιστρέφει το "Δεν είναι δυνατή η λήψη του Ιδιότητα VLookup σφάλματος της κλάσης WorksheetFunction ".
2. Για παράδειγμα, εισαγάγετε την τιμή 28 στο κελί H2.
Αποτέλεσμα όταν κάνετε κλικ στο κουμπί εντολών στο φύλλο:
3. Για να αντικαταστήσετε αυτό το σφάλμα με ένα φιλικό μήνυμα, ενημερώστε τον κωδικό ως εξής.
Σφάλμα GoTo InvalidValue:
Εύρος ("H3"). Value = WorksheetFunction.VLookup (Range ("H2"), Range ("B3: E9"), 4, False)
Έξοδος Sub
InvalidValue: Range ("H3"). Value = "Not Found"
Αποτέλεσμα όταν κάνετε κλικ στο κουμπί εντολών στο φύλλο:
Σημείωση: επισκεφθείτε τη σελίδα μας σχετικά με το χειρισμό σφαλμάτων για να μάθετε περισσότερα σχετικά με αυτό το θέμα.
