access 2010 用vba向表中添加记录？

请问我如何能够用vba向表中添加数据。这些数据都是有规律的

2024-12-17 08:28:32

推荐回答（1个）

回答1：

按Alt+F11进入VBA，插入一个模块，粘贴以下代码：

Sub 在条码表中插入150条记录()
For i = 1 To 150
'insert into 条码表(条码,批次) values('A000001','JJJ1-1')
CurrentDb.Execute ("insert into 条码表(条码,批次) values('A" & Right(CStr(1000000 + i), 6) & "','JJJ1-1')")
Next
End Sub

光标定位到“在条码表中插入150条记录()”，按F5执行这个过程。