VBA-regnearksfunktion - Hvordan bruges WorksheetFunction i VBA?

Indholdsfortegnelse

Excel VBA-regnearksfunktioner

Arbejdsarkfunktion i VBA bruges, når vi skal henvise til et specifikt regneark, normalt når vi opretter et modul, udføres koden i det aktuelt aktive ark i projektmappen, men hvis vi vil udføre koden i det specifikke regneark, bruger vi regnearkfunktionen, denne funktion har forskellige anvendelser og applikationer i VBA.

Det bedste ved VBA er, ligesom hvordan vi bruger formler i regnearket på samme måde, har VBA også sine egne funktioner. Hvis dette er det bedste, så har det også en smuk ting. Det er "vi kan også bruge regnearksfunktioner i VBA."

Ja!!! Du hørte det rigtigt; vi kan også få adgang til regnearksfunktioner i VBA. Vi kan få adgang til nogle af regnearkfunktionerne, mens vi skriver koden og gør den til en del af vores kode.

Hvordan bruges regnearkfunktioner i VBA?

I regnearket starter alle formler med lige (=) tegn, ligesom i VBA-kodning, for at få adgang til regnearkformler, skal vi bruge ordet "WorksheetFunction."

Inden du indtaster en regnearkformel, skal du nævne objektnavnet "Arbejdsarkfunktion" og derefter sætte en prik (.), Så får du en liste over alle de tilgængelige funktioner under dette objekt.

I denne artikel vil vi udelukkende koncentrere os om, hvordan du bruger regnearkfunktioner i VBA-kodning, hvilket vil tilføje mere værdi til din kodningskendskab.

# 1 - Simple SUM-regnearksfunktioner

Ok, for at starte med regnearksfunktioner skal du anvende den enkle SUM-funktion i excel for at tilføje tal fra regnearket.

Antag, at du har månedlige salgs- og omkostningsdata i regnearket som nedenstående.

I B14 og C14 er vi nødt til at nå frem til summen af ​​ovenstående tal. Følg nedenstående trin for at starte processen med at anvende “SUM” -funktionen i Excel VBA.

Trin 1: Opret et simpelt, excel makronavn.

Kode:

Under regneark_Funktion_eksempel1 () Afslut sub

Trin 2: Da vi har brug for resultatet i celle B14, skal du starte koden som Range ("B14"). Værdi =

Kode:

Under regneark_Funktion_eksempel1 () Område ("B14"). Værdi = Afslut sub

Trin 3: I B14 har vi brug for værdien som resultat af summen af ​​tallene. Så for at få adgang til SUM-funktionen fra regnearket skal du starte koden som "Arbejdsarkfunktion."

Kode:

Under regneark_Funktion_eksempel1 () Område ("B14"). Værdi = Arbejdsarkfunktion. Afslut sub

Trin 4: I det øjeblik du sætter en prik (.), Begynder den at vise de tilgængelige funktioner. Så vælg SUM fra dette.

Kode:

Under regneark_Funktion_eksempel1 () Område ("B14"). Værdi = ArbejdsarkFunktion.

Trin 5: Giv nu henvisningen til ovenstående tal, dvs. Range (“B2: B13”).

Kode:

Under Arbejdsark_Funktion_ Eksempel1 () Område ("B14"). Værdi = Arbejdsark Funktion.Sum (Område ("B2: B13")) Afslut Under

Trin 6: På samme måde skal du anvende en lignende kode til den næste kolonne ved at ændre cellereferencer.

Kode:

Underarbejdsark_Funktion_eksempel1 () Område ("B14"). Værdi = ArbejdsarkFunktion.Sum (Område ("B2: B13")) Område ("C14"). Værdi = ArbejdsarkFunktion.Sum (Område ("C2: C13")) Afslut sub

Trin 7: Kør nu denne kode manuelt eller brug F5-tasten for at have et samlet antal B14- og C14-celler.

Wow, vi har vores værdier. En ting, du skal bemærke her, er, at vi ikke har nogen formel i regnearket, men vi har lige fået resultatet af funktionen "SUM" i VBA.

# 2 - Brug VLOOKUP som en regnearksfunktion

Vi vil se, hvordan du bruger VLOOKUP i VBA. Antag, at nedenstående er de data, du har i dit excel-ark.

I E2-cellen havde du oprettet en rulleliste over alle zoner.

Based on the selection you made in the E2 cell, we need to fetch the Pin Code for the respective zone. But this time through VBA VLOOKUP, not worksheet VLOOKUP. Follow the below steps to apply VLOOKUP.

Step 1: Create a simple macro name in the Sub Procedure.

Code:

Sub Worksheet_Function_Example2() End Sub

Step 2: We need the result in the F2 cell. So start the code as Range (“F2”).Value =

Code:

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

Step 3: To access the worksheet function, VLOOKUP starts the code as “WorksheetFunction.VLOOKUP.”

Code:

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 2nd 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.

Vi kan ikke gå tilbage og køre makroen hver gang, så lad os tildele en makro til figurer. Indsæt en af ​​figurerne i et regneark.

Føj en tekstværdi til den indsatte form.

Højreklik nu og tildel makronavnet til denne form.

Klik på ok efter valg af makronavnet.

Nu har denne form koden til vores VLOOKUP-formel. Så når du ændrer zonenavnet, skal du klikke på knappen, det opdaterer værdierne.

Ting at huske

  • For at få adgang til regnearksfunktioner skal vi skrive ordet “WorksheetFunction” eller “Application.WorksheetFunction”.
  • Vi har ikke adgang til alle funktionerne, kun få.
  • Vi ser ikke den faktiske syntaks for regnearksfunktioner, så vi skal være helt sikre på den funktion, vi bruger.

Interessante artikler...