MS Access：以编程方式复制/粘贴选定的记录？

Question

对不起，我想最好解释我的问题的上下文。我有一个Access 2003数据库，用户需要根据表中已有的记录创建新记录。一些数据库的用户都比较熟悉，一般的计算机和创建由...

1. Selecting a previous record in a datasheet and copying it (via right click -> Copy) 
2. Selecting new row in the datasheet and "pasting" the previous record (via right click => Paste) 
3. Edit the newly pasted row with the new data 

这正常的数据表是基于使用的“自动编号”表中的字段防止新纪录重复。我遇到的问题是这个数据库的一些用户不是那么“电脑化”，并且在右键点击等时遇到了一些困难......我被要求创建一个按钮，这个按钮可以帮助你...

1. Copies the previous record 
2. Inserts it into datasheet 

用户可以根据需要编辑新记录。这导致我的问题。我如何着手复制记录，然后在VBA中以编程方式将其插入到数据表中？感谢您的任何建议。

Answer 1

使用追加查询。

一些注意事项：

s = "Insert Into TableX (Field1, Field2, Field3) " _ 
    & "Select Field1, Field2, Field3 From TableX " _ 
    & "Where ID=" & Forms!TableXForm!ID 

CurrentDb.Execute s 

Forms!TableXForm.Requery