dim SQL as String
dim rs As Recordset
SQL = " SELECT SUM(フィールド名) AS 名前 FROM テーブル名 "
Set rs = CurrentDb.OpenRecordset(SQL)
指定フィールドの合計値を返します。
例: SQL = " SELECT SUM( 金額 ) AS 売上合計金額 FROM 売上日報 WHERE 商品ID = 3 "
売上日報テーブルの商品IDが3の金額の合計を取得します。
合計値は売上合計金額の名前になります。