![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?c9bd177)
No.2ベストアンサー
- 回答日時:
SQL文でWHEREで抽出した合計が取れます。
select sum(列名) as sum_列名 from SYOKEI where 条件列名 = 条件値 group by 集計単位列;
sum(列名) 合計
avg(列名) 平均
max(列名) 最大値
min(列名) 最小値
asの後ろで列名を指定してあげれば、そのレコードセットで取得できます。
例で行けば
rsURIAGE.fields("sum_列名")
ですね。
他にも有りますがその辺りはselect文を解説している資料等に記載されているはずです。
No.1
- 回答日時:
lngSum = 0
Do Until rsURIAGE.EOF
lngSum = lngSum + rsURIAGE("SYOKEI")
rsURIAGE.MoveNext
Loop
みたいなことする以外に方法はないと思います。
私ならSQL文で初めから集計します。
#Filter利用時は無理ですが、そもそもFilter使うぐらいなら初めからWHERE句で絞り込んだ方が高速ですし。
SELECT SYOKEI, SUM(SYOKEI) AS SYOKEI_SUM FROM TBL_URIAGE
とか?
以上、参考になれば幸いです。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Word(ワード) エクセル→ワード差し込み印刷 1 2022/10/05 17:32
- C言語・C++・C# このプログラミングの問題を教えてほしいです。 キーボードからデータ数nとn個のデータを入力し、平均値 3 2022/12/19 22:51
- Excel(エクセル) エクセルのSUM関数について 4 2023/04/18 10:37
- Excel(エクセル) EXCELの「接続」のSQLのコマンド文字列にて、セルから任意の数値を利用したい 2 2023/03/09 16:43
- MySQL SQLです。下記の問合せを行うクエリを、PhpMyAdminで作成して実行せよ。 「昨年の各月の総降 1 2023/07/01 00:32
- Excel(エクセル) エクセルの関数で教えてください 2 2022/11/27 10:23
- Visual Basic(VBA) データベースから絞り込んでデータを読み込み 1 2023/02/21 19:51
- 会計ソフト・業務用ソフト ExcelのSUM関数と+の違い 2 2022/07/12 18:32
- Excel(エクセル) エクセル/列追加時、合計行の計算式 7 2023/03/15 11:14
- Excel(エクセル) A列が指定数値以上になったらD列の計算式を変更 3 2022/07/11 11:03
このQ&Aを見た人はこんなQ&Aも見ています
-
「環境が人を育てる」って本当?環境によって人格や生き方は本当に変わるのか
環境が人生に与える影響は実際どれほどのものなのか、専門家の田宮由美さんに伺った。
-
Access サブフォームでの選択行の取得
その他(データベース)
-
ACCESSでコンボボックスにSQLで抽出した値を表示したい
その他(データベース)
-
レコードセット(ADO.Recordset)で処理レコードは何番目?
Visual Basic(VBA)
-
-
4
カレントレコードが無い事を判定させる方法
Visual Basic(VBA)
-
5
Access コンボボックスの値をクリアしたい。
PowerPoint(パワーポイント)
-
6
オープンしているレコードセットの中の最大値
その他(データベース)
-
7
初歩的で申し訳ないですが…ADOでExcel検索しています。
Visual Basic(VBA)
-
8
【ACCESS】フォーム名/コントロール名を文字列型変数で指定するには
Access(アクセス)
-
9
VBA ユーザーフォームのChangeイベントを停止したい
Access(アクセス)
-
10
フォームを開くときに、コンボボックスの値を選択(アクセスVBA)
Visual Basic(VBA)
-
11
Access フォーム「使用可能」を「いいえ」にすると・・
その他(データベース)
-
12
テキストボックス名を変数で指定してプロパティ設定?
その他(データベース)
-
13
ado フィルタで 含まない とするには?
Excel(エクセル)
-
14
実行時エラー '3464': 抽出条件でデータ型が
Access(アクセス)
-
15
ADO オブジェクトの渡し方
Visual Basic(VBA)
-
16
Access テキスト型に対する指定桁での0埋め方法
その他(データベース)
-
17
サブフォームの新規レコードに移動したい アクセス
Access(アクセス)
-
18
accessでの文字列の混ざった連番処理について
Access(アクセス)
-
19
SQL文で パラメータが少なすぎます エラー
Access(アクセス)
関連するカテゴリからQ&Aを探す
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Worksheets メソッドは失敗しま...
-
B列の最終行までA列をオート...
-
Excelで、あるセルの値に応じて...
-
URLのリンク切れをマクロを使っ...
-
vba 2つの条件が一致したら...
-
VBAを使って検索したセルをコピ...
-
VBAのFind関数で結合セルを検索...
-
マクロ 最終列をコピーして最終...
-
IIF関数の使い方
-
rowsとcolsの意味
-
文字列の結合を空白行まで実行
-
マクロについて。S列の途中から...
-
VBA グラフX軸の変更
-
■VBAで条件による行挿入方法
-
複数情報が入っている1行を、複...
-
別シートから年齢別の件数をカ...
-
C# Datagridview 行ヘッダーの...
-
空白セルをとばして転記
-
C# datagridview 列幅の調整
-
VBAで散布図(グラフ)の作成
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Worksheets メソッドは失敗しま...
-
B列の最終行までA列をオート...
-
Excelで、あるセルの値に応じて...
-
vba 2つの条件が一致したら...
-
Cellsのかっこの中はどっちが行...
-
VBAを使って検索したセルをコピ...
-
文字列の結合を空白行まで実行
-
VBA指定行削除
-
VBAのFind関数で結合セルを検索...
-
IIF関数の使い方
-
VBA 何かしら文字が入っていたら
-
マクロ 最終列をコピーして最終...
-
エクセルについて
-
【VBA】2つのシートの値を比較...
-
URLのリンク切れをマクロを使っ...
-
データグリッドビューの一番最...
-
Changeイベントでの複数セルの...
-
空白セルをとばして転記
-
rowsとcolsの意味
-
エクセルVBAにて =A1=B1とすれ...
おすすめ情報