• 締切済み

Access2000のDsumについて

Access2000のVBAにDsumを記述してテーブルのフィールド（通過型）の合計を求めようとしたのですが、私のパソコンなら上手くいくのに、他のパソコンでは上手く計算してくれません。なぜでしょうか？

みんなの回答

  • ARC
  • ベストアンサー率46% (643/1383)
回答No.1

参照設定の、VBAの項目が消えちゃってるとか…?

momo-chan
質問者

補足

Visual Basic For Applicationsの項目にはチェックが入っていました。 使えなかったパソコンとは別のパソコンでも試してみたのですが、やはりダメでした。私のパソコンでは使用できるのですが、何故でしょうか？

  1. カテゴリ
  2. パソコン・スマートフォン
  3. ソフトウェア
  4. オフィス系ソフト

関連するQ&A

  • ACCESS VBAのDSUMを使ってUPDATE

    よろしくお願いします。 通貨型のACCESSデータベースのレコードにDSUMを使ったUPDATE文で更新をしたいのですが、 うまくいきません。 イミディエイトウィンドウで出力したSQLをACCESSのクエリーで実行したところ、 "1個のフィールドで型変換エラー"となります。 実行したSQLは下記のようなものです。 UPDATE テーブル名 SET フィールド名 = DSUM(フィールド名,"テーブル名",コードI = '0000' AND コードII BETWEEN '5110' AND '5410') WHERE コードI = '0000' AND コードII = '5980'; 因みに、更新元テーブルと更新先テーブルは同じテーブルです。 行いたいのは、コードII列の「5110」～「5410」の合計値を、「5980」の場所にUPDATEを させようとしてます。 よろしくお願いします。

  • DSum　検索する値がないなら

    アクセスvbaで Sub test() i = DSum("[合計]", "テーブル1", "[計上日] Between #2015/02/13# And #15/02/13#") End Sub このようなコードを作り、 テーブル1の計上日フィールドが2015/02/13のレコードの合計の値を返したいのですが、 そもそもテーブル1の計上日フィールドに2015/02/13がない場合は、 実行時エラー94 Nullの使い方が不正です。 と表示されてしまいます。 このエラーを発生させないためにはどういうコードを作ればいいのでしょうか？ まず、テーブル1に2015/02/13のレコードがあるかどうかを取得したいのですが、 その取得はどうすればいいでしょうか？ その後、あるならIFステートメントで条件分岐したいです。

  • ACCESS DSUM関数の使い方について

    よろしくお願いいたします。 環境：winXP/Access2003(Office2003) 受注データが２つのファイルに分かれています。 (1)ヘッダーテーブル：ORDER_H (2)明細テーブル：ORDER_D クエリにて２つのテーブルを結合し、同一クエリ内のフィールドで、受注NO(ORDER_NO)毎の”消費税（TAX）"と”明細小計（syo_kingaku)"の累計を計算したい状況です。 現在クエリのフィールドに、 式1:DSum([TAX],"ORDER_D","[ORDER_NO]="&"[ORDER_NO]")とセットし実行しましたら、 計算結果は、[TAX]×レコード数になってしまいます。 恐れ入りますがご教授をお願いいたします。

  • アクセス　クエリ　DSum関数

    testテーブル 日付 　　　　金額 2009/04/30 　1 2009/05/01 　2 2009/05/02 　3 2009/06/30 　4 このデータを元にクエリを作成して 4/1～5/30までの合計を新フィールドに表示させたいです。 日付 　　　　金額 　　4,5月合計 2009/04/30 　1 　 　　　6 2009/05/01 　2 　 　　　6 2009/05/02 　3 　 　　　6 2009/06/30 　4 　　　（表示なし） としたいのですが 4,5月合計: DSum("[金額] ","test",[日付]>=#2009/04/01# And [日付]<=#2009/05/30#) とすると 日付 　　　　金額 　4,5月合計 2009/04/30 　1 　 　　10 2009/05/01 　2 　 　　10 2009/05/02 　3 　 　　10 2009/06/30 　4 　　（表示なし） となってしまいます。 「2009/4/1～2009/5/30のレコードに金額の合計を表示させる」のではく、 「2009/4/1～2009/5/30の金額の合計を表示させる」 にはどうすればいいですか？ 表示についてはIIF関数で対応できると思っています。 よろしくお願いします。

  • ACCESS VBAの定義域集計関数の条件設定について

    ＡＣＣＥＳＳのＶＢＡで定義域集計関数のＤｓｕｍ関数を使用しています。 Ｄｓｕｍ関数は 結果＝Ｄｓｕｍ（フィールド名、テーブル名やクエリ名[、条件]） で、条件については、ＳＱＬ分のＷＨＥＲＥ句ののＷＨＲＥを除いた部分を記述すると解説されています。 そこで月別経費一覧表のクエリーから経費月を2004.4月、5月、6月の累計を出すべく下記の様な式を作って見ました。 累計経費実績 = DSum("[金額]", "qry月別経費一覧", "経費月 IN('2004.04','2004.5','2004.6')") 実行してみると、条件であるIN句の中のはじめの条件'2004.4'月の[金額]の合計だけが計算されます。 順番を入れ替えて、'2004.5'を先頭にすると５月分の[金額]の合計のみが計算されました。 本来、３ヶ月分の[金額]が合計されて欲しいわけですがどこに不具合があるか解りません。 いろいろと調べてみましたが原因がわかりません。 ネット等でも探しましたが見つけることが出来ませんでした。 どなたかおわかりの方お教えください。 使用PCはWINDOWS XP／ACCESS2000です。 よろしくお願いします。

  • Access　Dsum関数

    サブフォームのレコードセットの合計を求めメインフォームにボックスで表示したいのですが、Dsumの演算対象の条件の記述が間違っているらしくエラーがでます。 =DSum("前年度売上","Q_商品分類のサブフォーム","品目ID＝" & [業態&調査商品]![Q_商品分類のサブフォーム]![品目ID]="1090") 品目IDの1090をどう指定してやるかが分かりません。

  • Accessのクエリーで合計を出したい

    WinXPでAccess97を使用しています。 数値型のフィールドで、名前が「1」「2」・・・「50」とついてます。これをクエリーで、それぞれのフィールドの値を合計する演算フィールド「合計」を作成したいと思います。 「合計:[1]+[2]+・・・[50]」でもいいのですが、式が長くなります。ForNext文などVBAのループを使ってモジュールに記述して、合計を出す方法はありますか？

  • access2013でのDsum関数で質問です

    フォームにてテーブルの合計を出そうとしているのですが、テキストボックスに =DSum("実収","車","店名='本社' And 集荷日=#" & Date() & "#") と、入力するときちんと反映されるのですが、 =DSum("実収","車","店名<>'本社' And 集荷日=#" & Date() & "#") と、入力すると空欄になってしまい期待する数値が出てきません。 もちろん元のデータは '本社' 以外のレコードもあるのですがその数字が反映されないのです。 どこが間違っているのか指摘していただけないでしょうか？

  • エクセルのDSUM関数について

    =dsum(データーベース、フィールド、条件) の条件のところにいれたが反応せず、ただ”フィールド”の列を合計したものがかえってきてしまうのですが。 =DSUM(C59:E90,E90,C114:E115) C59　D59　E90 分類 媒体 金額 行の90までデーターが入っています。 C114　D114　E114 分類 媒体 金額 行の114まで条件が入力できるようになっています。 分類・媒体・金額の部分はセルを2行結合しているのですが、条件の部分もセルを結合しています。 フィールド名が結合したセルだとDSUMはつかえないのでしょうか？

  • 関数　DSUMについて

    簡単にわかりそうなことなんですが、いろいろ考えてみてもわからないので教えてください。 DSUMで空白セルの行を検索して他の列の数字を合計したいのですが、どのようにすればいいのでしょううか？

注目のQ&A

カテゴリ

専門家に質問してみよう

職業から探して質問する

あなたにピッタリな商品が見つかる！ OKWAVEセレクト

質問する