Λειτουργία φύλλου εργασίας VBA - Πώς να χρησιμοποιήσετε το WorksheetFunction στο VBA;

Πίνακας περιεχομένων

Λειτουργίες φύλλου εργασίας του Excel VBA

Λειτουργίες φύλλου εργασίας του Excel VBA

Η συνάρτηση φύλλου εργασίας στο VBA χρησιμοποιείται όταν πρέπει να αναφέρεται σε ένα συγκεκριμένο φύλλο εργασίας, κανονικά όταν δημιουργούμε μια ενότητα ο κώδικας εκτελεί στο τρέχον ενεργό φύλλο του βιβλίου εργασίας, αλλά αν θέλουμε να εκτελέσουμε τον κώδικα στο συγκεκριμένο φύλλο εργασίας χρησιμοποιούμε τη λειτουργία φύλλου εργασίας, αυτή η λειτουργία έχει διάφορες χρήσεις και εφαρμογές στο VBA.

Το καλύτερο πράγμα για το VBA είναι, όπως ο τρόπος με τον οποίο χρησιμοποιούμε τύπους στο φύλλο εργασίας ομοίως, το VBA έχει επίσης τις δικές του λειτουργίες. Εάν αυτό είναι το καλύτερο, τότε έχει και ένα όμορφο πράγμα. Δηλαδή "μπορούμε να χρησιμοποιήσουμε και λειτουργίες φύλλου εργασίας στο VBA."

Ναί!!! Το ακούσατε σωστά. μπορούμε επίσης να έχουμε πρόσβαση σε λειτουργίες φύλλων εργασίας στο VBA. Μπορούμε να έχουμε πρόσβαση σε ορισμένες από τις λειτουργίες του φύλλου εργασίας ενώ γράφουμε τον κώδικα και να τον κάνουμε μέρος του κώδικα μας.

Πώς να χρησιμοποιήσετε τις λειτουργίες φύλλου εργασίας στο VBA;

Στο φύλλο εργασίας, όλοι οι τύποι ξεκινούν με το σύμβολο ίσο (=), όπως και στην κωδικοποίηση VBA, για να αποκτήσουμε πρόσβαση στους τύπους φύλλων εργασίας, πρέπει να χρησιμοποιήσουμε τη λέξη "WorksheetFunction".

Πριν εισαγάγετε οποιονδήποτε τύπο φύλλου εργασίας, πρέπει να αναφέρετε το όνομα του αντικειμένου "WorksheetFunction" και, στη συνέχεια, να βάλετε μια τελεία (.), Τότε θα λάβετε μια λίστα με όλες τις διαθέσιμες συναρτήσεις κάτω από αυτό το αντικείμενο.

Σε αυτό το άρθρο, θα επικεντρωθούμε αποκλειστικά στον τρόπο χρήσης των λειτουργιών του φύλλου εργασίας στην κωδικοποίηση VBA, η οποία θα προσθέσει περισσότερη αξία στις γνώσεις κωδικοποίησης.

# 1 - Απλές λειτουργίες φύλλου εργασίας SUM

Εντάξει, για να ξεκινήσετε με τις λειτουργίες του φύλλου εργασίας, εφαρμόστε την απλή συνάρτηση SUM στο excel για να προσθέσετε αριθμούς από το φύλλο εργασίας.

Ας υποθέσουμε ότι έχετε μηνιαία δεδομένα πωλήσεων και κόστους στο φύλλο εργασίας όπως το παρακάτω.

Στο B14 και C14, πρέπει να φτάσουμε στο σύνολο των παραπάνω αριθμών. Ακολουθήστε τα παρακάτω βήματα για να ξεκινήσετε τη διαδικασία εφαρμογής της λειτουργίας "SUM" στο Excel VBA.

Βήμα 1: Δημιουργήστε ένα απλό όνομα μακροεντολής excel.

Κώδικας:

Υπο φύλλο εργασίας_Fungsi_Παράδειγμα1 () Λήξη Υπο

Βήμα 2: Δεδομένου ότι χρειαζόμαστε το αποτέλεσμα στο κελί B14, ξεκινήστε τον κωδικό ως Range ("B14"). Value =

Κώδικας:

Sub Worksheet_Function_Example1 () Range ("B14"). Value = End Sub

Βήμα 3: Στο Β14, χρειαζόμαστε την τιμή ως αποτέλεσμα του αθροίσματος των αριθμών. Έτσι, για να αποκτήσετε πρόσβαση στη συνάρτηση SUM από το φύλλο εργασίας, ξεκινήστε τον κωδικό ως "WorksheetFunction".

Κώδικας:

Sub Worksheet_Function_Example1 () Range ("B14"). Value = WorksheetFunction. Τέλος Υποτ

Βήμα 4: Μόλις βάλετε μια τελεία (.), Θα αρχίσει να εμφανίζει τις διαθέσιμες λειτουργίες. Επιλέξτε λοιπόν SUM από αυτό.

Κώδικας:

Sub Worksheet_Function_Example1 () Range ("B14"). Value = WorksheetFunction.Sum End Sub

Βήμα 5: Τώρα δώστε την αναφορά των παραπάνω αριθμών, δηλαδή, Εύρος ("B2: B13").

Κώδικας:

Sub Worksheet_Function_Example1 () Range ("B14"). Value = WorksheetFunction.Sum (Range ("B2: B13")) End Sub

Βήμα 6: Ομοίως, για την επόμενη στήλη, εφαρμόστε έναν παρόμοιο κώδικα αλλάζοντας τις αναφορές κελιού.

Κώδικας:

Sub Worksheet_Function_Example1 () Range ("B14"). Value = WorksheetFunction.Sum (Range ("B2: B13")) Range ("C14"). Value = WorksheetFunction.Sum (Range ("C2: C13")) End Sub

Βήμα 7: Τώρα εκτελέστε αυτόν τον κώδικα χειροκίνητα ή χρησιμοποιώντας το πλήκτρο F5 για να έχετε ένα σύνολο σε κελιά B14 & C14.

Ουάου, έχουμε τις αξίες μας. Ένα πράγμα που πρέπει να παρατηρήσετε εδώ είναι ότι δεν έχουμε καμία φόρμουλα στο φύλλο εργασίας, αλλά μόλις έχουμε το αποτέλεσμα της συνάρτησης "SUM" στο VBA.

# 2 - Χρησιμοποιήστε το VLOOKUP ως συνάρτηση φύλλου εργασίας

Θα δούμε πώς να χρησιμοποιείτε το VLOOKUP στο VBA. Ας υποθέσουμε παρακάτω είναι τα δεδομένα που έχετε στο φύλλο excel σας.

Στο κελί E2, είχατε δημιουργήσει μια αναπτυσσόμενη λίστα όλων των ζωνών.

Με βάση την επιλογή που κάνατε στο κελί E2, πρέπει να πάρουμε τον κωδικό PIN για την αντίστοιχη ζώνη. Αλλά αυτή τη φορά μέσω του VBA VLOOKUP, όχι του φύλλου εργασίας VLOOKUP. Ακολουθήστε τα παρακάτω βήματα για να εφαρμόσετε το VLOOKUP.

Βήμα 1: Δημιουργήστε ένα απλό όνομα μακροεντολής στη διαδικασία Sub.

Κώδικας:

Υπο φύλλο εργασίας_Fungsi_Παράδειγμα2 () Τέλος

Βήμα 2: Χρειαζόμαστε το αποτέλεσμα στο κελί F2. Ξεκινήστε λοιπόν τον κωδικό ως Range ("F2"). Value =

Κώδικας:

Sub Worksheet_Function_Example2 () Range ("F2"). Value = End Sub

Βήμα 3: Για να αποκτήσετε πρόσβαση στη λειτουργία φύλλου εργασίας, το VLOOKUP ξεκινά τον κωδικό ως "WorksheetFunction.VLOOKUP".

Κώδικας:

Sub Worksheet_Function_Example2 () Range ("F2"). Value = WorksheetFunction.Vlookup (End Sub

Step 4: One of the problems here is syntax will not give you any sort of guidance to work with VLOOKUP. You need to be absolutely sure about the syntax you are working on.

The first syntax of VLOOKUP is “Lookup Value.” In this case, our lookup value is E2 cell value, so write the code as Range (“E2”).Value

Code:

Sub Worksheet_Function_Example2() Range ("F2").Value = WorksheetFunction.Vlookup(Range ("E2").Value, End Sub

Step 5: Now, the second argument is our table array. In this case, our table array range is from A2 to B6. So the code will be Range (“A2:B6”)

Code:

Sub Worksheet_Function_Example2() Range ("F2").Value = WorksheetFunction.Vlookup(Range ("E2").Value,Range ("A2:B6"), End Sub

Step 6: The Third argument will be from which column we need the data from the table array. Here we need the data from the 2^nd column, so the argument will be 2.

Code:

Sub Worksheet_Function_Example2() Range ("F2").Value = WorksheetFunction.Vlookup(Range ("E2").Value,Range ("A2:B6"),2, End Sub

Step 7: The final argument is range lookup, we need an exact match, so the argument is zero (0).

Code:

Sub Worksheet_Function_Example2() Range("F2").Value = WorksheetFunction.VLookup(Range("E2").Value, Range("A2:B6"), 2, 0) End Sub

So, we are done with the coding part. Now go to the worksheet and select any of the range.

Now go to your coding module and run the macro Using the F5 key or manually to get the pin code of the selected zone.

Δεν μπορούμε να επιστρέψουμε και να εκτελούμε τη μακροεντολή κάθε φορά, οπότε ας αντιστοιχίσουμε μια μακροεντολή σε σχήματα. Εισαγάγετε ένα από τα σχήματα σε ένα φύλλο εργασίας.

Προσθέστε μια τιμή κειμένου στο εισαγόμενο σχήμα.

Τώρα κάντε δεξί κλικ και αντιστοιχίστε το όνομα της μακροεντολής σε αυτό το σχήμα.

Κάντε κλικ στο ok αφού επιλέξετε το όνομα της μακροεντολής.

Τώρα, αυτό το σχήμα περιέχει τον κώδικα του τύπου VLOOKUP. Έτσι, όποτε αλλάζετε το όνομα της ζώνης, κάντε κλικ στο κουμπί, θα ενημερώνει τις τιμές.

Πράγματα που πρέπει να θυμάστε

Για πρόσβαση στις λειτουργίες του φύλλου εργασίας, πρέπει να γράψουμε τη λέξη "WorksheetFunction" ή "Application.WorksheetFunction"
Δεν έχουμε πρόσβαση σε όλες τις λειτουργίες, μόνο μερικές.
Δεν βλέπουμε την πραγματική σύνταξη των λειτουργιών του φύλλου εργασίας, επομένως πρέπει να είμαστε απολύτως σίγουροι για τη λειτουργία που χρησιμοποιούμε.