AccessVBA SQLのCount値でのUPDATE

Question

前提・実現したいこと

テーブルT_Aで
nameフィールドが「aaa」かつnumフィールドが「1」のレコードの
storeIDの値を特定して、
テーブルT_Aにある同値のstoreIDを持つレコードに、上の条件に合致したレコード数をnumCountフィールドに入力したいです。

なお、主キーはこれらとは別フィールドに設定されています。

図で表すと、下記のようなイメージです。

実行前
storeID name num numCount
1 　　　aaa　 1　　 null
1 　　　aaa 　1　　 null
1 　　　aaa　 0　　 null
2 　　　aaa 　1　　 null
2 　　　aaa 　0　　 null
2 　　　aaa 　0　　 null
3 　　　aaa 　0　　 null
3 　　　aaa 　0　　 null

---

実行後
storeID name num numCount
1 　　　aaa　 1　　 2
1 　　　aaa 　1　　 2
1 　　　aaa　 0　　 2
2 　　　aaa 　1　　 1
2 　　　aaa 　0　　 1
2 　　　aaa 　0　　 1
3 　　　aaa 　0　　 null
3 　　　aaa 　0　　 null

---

以下コードを試してみましたが、エラーが出てしまいました。
これは自分でも根本的に間違っている気がしているのですが、どこをどう間違っているかも分からなくなっています。。。
是非ご教示いただければありがたいです。
よろしくお願いします。

発生している問題・エラーメッセージ

クエリに、集計関数の一部として指定された式'numCount'が含まれていません。

該当のソースコード

Dim db As DAO.Database
Set db = CurrentDb

Dim mySql As String

mySql = "UPDATE T_A"
mySql = mySql & " SET numCount = Count(num)"
mySql = mySql & " WHERE storeID IN("
mySql = mySql & " SELECT storeID from T_A"
mySql = mySql & " WHERE name = 'aaa' AND num = 1)"

db.Execute strSQL, dbFailOnError

db.Close
Set db = Nothing

補足情報（FW/ツールのバージョンなど）

Access2016

Answer 1

numCount列の必要性はこの際おいといて。
Accessのクエリは集計値でupdateできない困った仕様なんですが、
その独特の仕様を突いて集計することは可能です。

未検証ですがこんな感じです。

update T_A as A
 INNER JOIN T_A AS B ON A.storeID = B.storeID
set A.numCount=nz(A.numCount,0)+1
where B.name='aaa'
  and B.num=1

一行ずつupdateされるイメージで式を書くとsumやcount相当の更新クエリを
書くことができます。

訂正

間違えてたので訂正
num=1確定ならnumを積み上げる感じで書けばいいかな

UPDATE T_A AS A 
 INNER JOIN T_A AS B ON A.StoreID = B.StoreID
SET A.numCount = Nz([A].[numCount],0)+Nz([B].[num],0)
where B.name='aaa';

StoreID=3をnullにしたいならwhere句にB.num=1も入れて
あとこれやるときは先にリセット用の更新クエリも走らせる必要あるかな

UPDATE T_A AS A 
SET A.numCount = null;

Comments

[sazi]

num=0が設定されませんよ

[sousuke]

あー文章読み違えてますね直しておきます

[tatsutatsu]

お返事が遅くなり申し訳ありませんでした。
こんなやり方もあるんですね。。まったく思いつきもしませんでした。
今回はベストアンサーの方のコードで解決できましたが、知見が深まりました。ありがとうございます。

また、機会がございましたらよろしくお願いします。

Answer 2

エラー内容は基本的な事です。

一体SQLの構文はどのように学習していますか？

更新クエリーで集計関数は使用できませんので、Dcount()などのD系関数を使用する事になりますが、そもそも自身のカウントを同じテーブルに持つべきではありません。

UPDATE T_A 
SET numCount = Dcount('*', 'T_A','storeID=' & storeID & ' and name= ''' & name & ''' and num=1') 
WHERE name = 'aaa'

Comments

[tatsutatsu]

お返事が遅くなり申し訳ございません。
無事解決できました。また、構文の理解というか、基本的なところから確認してみてようやく理解ができました。
データベースの考え方もご教示頂きありがとうございます。

拙い質問に回答いただきありがとうございました。