300 Exempel

Anpassad genomsnittlig funktion

Custom Average Function

Nedan kommer vi att titta på ett program i Excel VBA som skapar en Användardefinierad funktion som beräknar genomsnitt av ett slumpmässigt valt intervall exklusive ett eller flera värden som är avvikande och inte bör räknas i genomsnitt.





Situation:

Anpassad genomsnittlig funktion i Excel VBA





Användardefinierade funktioner måste placeras i en modul.

1. Öppna Visual Basic Editor och klicka på Infoga, modul.



2. Lägg till följande kodrad:

FungeraCUSTOMAVERAGE (rngSomRäckvidd, lägreSom Heltal, övreSom Heltal)

Namnet på vår funktion är CUSTOMAVERAGE. Delen mellan parenteserna innebär att vi ger Excel VBA ett intervall och två heltalsvariabler som input. Vi heter vårt intervall rng, en heltalsvariabel som vi kallar lägre och en heltalsvariabel som vi kallar övre, men du kan använda alla namn.

3. Därefter deklarerar vi ett Range -objekt och två variabler av typen Integer. Vi kallar Range -objektcellen. En heltalsvariabel kallar vi total och en heltalsvariabel som vi kallar count.

hur man hittar räntan på Excel
IngencellSomRäckvidd, totaltSom Heltal, räknaSom Heltal

4. Vi vill kontrollera varje cell i ett slumpmässigt valt område (detta område kan vara av valfri storlek). I Excel VBA kan du använda slingan För varje nästa för detta. Lägg till följande kodrader:

För VarjecellIrng

Nästacell

Notera: rng och cell väljs slumpmässigt här, du kan använda alla namn. Kom ihåg att hänvisa till dessa namn i resten av din kod.

5. Därefter kontrollerar vi varje värde i detta intervall om det faller mellan de två värdena (nedre och övre). Om det är sant, ökar vi totalt med cellens värde och vi ökar antalet med 1. Lägg till följande kodrader i slingan.

Omcell.Värde> = lägreOchcell.Värde<= upper Sedan
totalt = totalt + cell. värde
count = count + 1
Slutet Om

6. För att returnera resultatet av denna funktion (det önskade genomsnittet), lägg till följande kodrad utanför slingan.

CUSTOMAVERAGE = total / antal

7. Glöm inte att avsluta funktionen. Lägg till raden:

Slutet Fungera

8. Nu kan du använda den här funktionen precis som alla andra Excel -funktioner för att beräkna genomsnittet av tal som faller mellan två värden.

Resultat:

Anpassat genomsnittligt funktionsresultat

Som en kontroll kan du ta bort alla värden som är lägre än 10 och högre än 30 och använda standardfunktionen Standard i Excel för att se om Excel beräknar samma genomsnitt som vår anpassade genomsnittliga funktion.

Anpassad genomsnittlig funktionskontroll

Microsoft Excel-formellista med exempel pdf

Vår anpassade genomsnittliga funktion fungerar! Obs! Den här funktionen är endast tillgänglig i denna arbetsbok.

3/5 klar! Läs mer om funktioner och subs>
Gå till nästa kapitel: Applikationsobjekt



^