Hvordan Gjennomsnittlig en kolonne i VBA

Microsoft Office Access databaseprogram omfatter et sett av aggregerte funksjoner, slik at brukerne kan utføre matematiske beregninger. Disse inkluderer gjennomsnitt, å telle antallet av elementer i en kolonne, og å finne minimum eller maksimum verdi i en kolonne med data. Du kan bruke disse funksjonene i databasespørringer eller i Visual Basic for Applications (VBA) kode for beregning av en enkelt verdi, for eksempel en sum eller kolonne gjennomsnittet. Kolonnen må inneholde numerisk, valuta eller dato / tidsdata. Du må definere en rekke data for å beregne gjennomsnittet av en kolonne i VBA-programmet.

Bruksanvisning

1 Klikk på "Start" -knappen i Windows og velg "Microsoft Office", "Microsoft Visual Basic for Applications."

2 Klikk "Open", "New" for å opprette VBA script for å beregne en kolonne gjennomsnittet i Access database.

3 Skriv inn følgende kode i vinduet:

Sub ColumnAvg ()

Dim RNG As Range

Dim i As Long

Sett RNG = Range ( "B1: B3")

For i = 3 til 12

Cells(i, "C").Value = ColumnFunction.Round _

(ColumnFunction.Sum (RNG) / 3, 0)

Sett RNG = Rng.Offset (1, 0)

Neste jeg

End Sub

4 Klikk på "File", "Lagre" for å lagre VBA script for å beregne et gjennomsnitt av "B" kolonnen.