Microsoft Access 掲示板
選択クエリで抽出した値で、更新したい / 4
16
コメント
views
4
フォロー
4
ちちみ
2023/09/07 (木) 12:33:34
2d148@1925b
ありがとうございます。VBAで直接更新ができるのですね。勉強不足ですみません。
では変数にしたいのなら以下のように変更すれば良いのでしょうか？
for A1=1 to 4
StrSQL1 =
" SELECT TOP 1 基" & A1 & ", 変位" & A1 & ", №" &
" FROM T_01地耐力" &
" WHERE T01地耐力.№ Between 1 And 9" &
" ORDER BY T_01_地耐力.変位" & A1 & "DESC , T_01_地耐力.№ DESC;"
Set rs = CurrentDB.OpenRecordSet(StrSQL)
rs.Edit
rs!"[基" & A1 &"] = '※'"
rs.UpDa[te
rs.Close
next
通報 ...