Microsoft Office Access -databas programmet ingår en uppsättning mängdfunktioner , så att användarna kan utföra matematiska beräkningar . Dessa inkluderar medelvärden , räkna antalet poster i en kolumn och hitta det lägsta eller högsta värdet i en kolumn med data . Du kan använda dessa funktioner i databasfrågor eller i Visual Basic for Applications ( VBA ) för beräkning av ett enda värde , t.ex. en summa eller kolumn genomsnitt . Kolumnen måste innehålla numeriska , valuta-eller datum /tid -data. Du måste ange ett intervall med data för att beräkna medelvärdet för en kolumn i VBA -program . Instruktioner
1
Klicka på "Start " -knappen i Windows och välj " Microsoft Office ", " Microsoft Visual Basic for Applications . "
2
Klicka på "Öppna ", " . ny " för att skapa VBA skript för beräkning av en kolumn genomsnittet i Access-databasen
3
Skriv följande kod i fönstret :
Sub ColumnAvg ( )
Dim Rng Som Range
Dim I As Long
Set Rng = Range ( " B1 : B3 " ) katalog
För i = 3 Till 12
Cells (i , " C " ) . Standard = ColumnFunction.Round _
( ColumnFunction.Sum ( RNG) /3 , 0 ) katalog
Set Rng = Rng.Offset ( 1 , 0 ) katalog
Nästa jag
End Sub
4
Klicka på " File ", " spara" för att spara VBA skript för att beräkna ett genomsnitt av de " B " kolumnen .