Microsoft Access 掲示板

VBAでエクセルを操作してシートにある値をアクセスのテーブルへ保存したい / 4

4 コメント
views
4 フォロー
4
初心者 2023/01/19 (木) 23:14:58 ddef7@7bb1a

上げさせていただいたコードだと、エラーが発生したときに、ブランクのレコードができてしまったので、

 If Err.Number = 0 Then

の位置を

 CurrentDb.Execute "insert into T1(f1,f2,f3,f4) VALUES('" & Rng1 & "','" & Rng2 & _
                                "','" & Rng3 & "','" & Rng4 & "');", dbFailOnError

の前に変えたらうまくいったようです。

通報 ...