初心者
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
の前に変えたらうまくいったようです。
通報 ...