如何将记录从表格1（tabel1）添加到表2

Question

当我在表1中，形式1我想有，当点击一个按钮是将记录添加到表2

这怎么可能成为可能吗？

Answer 1

，您可以运行SQL或VBA查询，例如：

Set db = CurrentDB 

sSQL="INSERT INTO Table2 (FKID, Stuff) VALUES (" & Me.ID & ",'" & Me.Stuff & "')" 
db.Execute sSQL, dbFailOnError 

MsgBox "Records inserted " & db.RecordsAffected 

或者，如果你已经建立了一个合适的查询：

DoCmd.OpenQuery "QueryName" 

请注意，如果您要添加到表，因为你想添加额外的项目到组合框列表中，搜索NotInList，你会发现一些建议。

Answer 2

的一种方式（出许多）： - 在按钮的单击事件：

currentdb.execute "insert into table2 (col1, col2) select 'some_string', 12345;"