Compartir a través de


Función Avg (Microsoft Access SQL)

Se aplica a: Access 2013 | Access 2016

Calcula la media aritmética de un conjunto de valores contenidos en un campo especificado de una consulta.

Sintaxis

Avg(expresión)

El marcador expresión representa una expresión de cadena que identifica el campo que contiene los datos numéricos cuya media se desea obtener o una expresión que realiza un cálculo con los datos de dicho campo. Los operandos de expresión pueden incluir el nombre de un campo de tabla, una constante o una función (que puede ser intrínseca o definida por el usuario, pero no una de las otras funciones de agregado de SQL).

Comentarios

El promedio calculado por Avg es la media aritmética (la suma de los valores dividida entre el número de valores). Avg de puede usar, por ejemplo, para calcular el promedio del costo de transporte.

La función Avg no incluye ningún campo Null en el cálculo.

Use Avg en una expresión de consulta y en la propiedad SQL de un objeto QueryDef o al crear un objeto Recordset basado en una consulta SQL.

Ejemplo

En este ejemplo, se utiliza la tabla Orders para calcular el promedio de gastos de transporte para los pedidos con gastos de transporte superiores a 100 dólares.

En este ejemplo, se llama al procedimiento EnumFields, que se incluye en el ejemplo de la instrucción SELECT.

Sub AvgX() 
 
    Dim dbs As Database, rst As Recordset 
 
    ' Modify this line to include the path to Northwind 
    ' on your computer. 
    Set dbs = OpenDatabase("Northwind.mdb") 
 
    ' Calculate the average freight charges for orders 
    ' with freight charges over $100.   
    Set rst = dbs.OpenRecordset("SELECT Avg(Freight)" _ 
        & " AS [Average Freight]" _ 
        & " FROM Orders WHERE Freight > 100;") 
    
    ' Populate the Recordset. 
    rst.MoveLast 
    
    ' Call EnumFields to print the contents of the  
    ' Recordset. Pass the Recordset object and desired 
    ' field width. 
    EnumFields rst, 25 
 
    dbs.Close 
 
End Sub

Vea también

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.