Microsoft Access 掲示板

Microsoft Access 掲示板

選択クエリで抽出した値で、更新したい / 3
3
hatena 2023/09/07 (木) 12:10:31 修正

更新したいテーブルは、T_01地耐力 ですか。
T_01地耐力 を特定の抽出条件で抽出して指定のフィールドで並べ替えて、先頭のレコードの[基4]フィールドを更新したいということですか。

だとしたら、VBAを使うなら、更新クエリではなく、VBAで更新した方が簡単そうです。

とりあえず考え方だけのコード例。

StrSQL = _
    " SELECT TOP 1 基4, 変位4, №" & _
    " FROM T_01地耐力" & _
    " WHERE T01地耐力.№ Between 1 And 9" & _
    " ORDER BY T_01_地耐力.変位4  DESC , T_01_地耐力.№ DESC;"
Set rs = CurrentDB.OpenRecordSet(StrSQL)
rs.Edit
rs![基4] = "※"
rs.UpDate
rs.Close
通報 ...