Avg 関数 (Microsoft Access SQL)

適用先: Access 2013 | Access 2016

クエリで指定したフィールドにある値の集合の平均値を計算します。

構文

Avg( expr )

expr プレースホルダーは、平均化する数値データを含むフィールドを識別する文字列式、またはそのフィールドのデータを使用して計算を実行する式を表します。 expr のオペランドには、テーブル フィールド、定数、または関数の名前を含めできます (組み込み関数またはユーザー定義関数を使用できますが、他の集計関数の 1 つSQLできません)。

注釈

Avg 関数で計算される平均は、値の合計を値の個数で割った算術平均です。 たとえば、平均運送料などを計算する場合に、Avg 関数を使用します。

Avg 関数は、Null 値のフィールドを除外して計算します。

Avg 関数は、クエリ式、および QueryDef オブジェクトの SQL プロパティで使用できます。また、SQL クエリを元にして Recordset オブジェクトを作成する場合にも使用できます。

次の使用例では、Orders テーブルを使用して、運送料が $100 を超える受注品の平均運送料を計算します。

この例では、EnumFields プロシージャを呼び出します。EnumFields プロシージャについては、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

関連項目

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。