Access2007 の SQL文です。

質問

宜しくお願いします。

DoCmd.RunSQL ("update 予算月別 inner join 予算実績 on 予算月別.科目ID=予算実績.科目ID " _
& " set 合計金額 =sum(当年予算) where (月度>=開始日) and (月度<=終了日) group by 科目ID; ")

これで
実行時エラー '3137':
SQL ステートメントの最後には、セミコロン(;)が必要です。

下記のSQL文は実行できました。 これを編集したものです。
DoCmd.RunSQL ("update 予算月別 inner join 予算実績 on 予算月別.科目ID=予算実績.科目ID " _
& " set 金額01 =当年予算 where 月度=開始日 ; ")

回答No.2

piroin654 · ベストアンサー

どうしたいのかよくわかりませんが、
エラーが発生するのは、

http://support.microsoft.com/default.aspx?scid=kb;ja;328828

の、

フィールドの値の合計、平均、カウント、その他の集計値を計算する
クエリでは、データを更新できません。

の部分。
DSumなどの定義域関数を使って回避します。

お礼

質問内容が不十分なのに、ご回答感謝します。

>フィールドの値の合計、平均、カウント、その他の集計値を計算する
>クエリでは、データを更新できません。
分かりました。

単純に
DoCmd.RunSQL ("update 予算明細 set 合計金額 = 金額01+金額02+……+金額11+金額12; ")
で解決しました。

予算実績テーブル（月,科目ID,予算額,実績額）から月を列方向に並べた一覧表を作成するために
予算明細テーブル（科目ID,予算額,金額01,金額02,…,金額11,金額12,合計金額)に展開する処理です。

回答No.1

Tomo-10-21

別途サンプルを作成して実行したわけではないので、間違っていたらごめんなさい。

上のSQLと下のSQLを比べると、セミコロンの前に半角スペースが下にはありますが、上にはありません。
こんな些細なことでできちゃったりしませんか？？

お礼

ご回答ありがとうございます。

DoCmd.RunSQL ("update 予算明細 set 合計金額 = 金額01+金額02+……+金額11+金額12; ")
で解決しました。