Need to dup a whole record in a data entry form

markw707 · June 9th, 2004, 04:07 PM

Is there an easy way to duplicate a whole record when entering data in a data entry form? I know I can use Ctrl ' to dup a field, but I want to dup the whole record. Is there a way to do this?

Thank you for your help!

Mark J. Weisberger

sal · June 9th, 2004, 08:52 PM

A whole record means a record containing the Primary key, which should be unique. This restriction will keep you from "duplicating the entire record".

What exactly are you trying to do? Please define duplicate.

Sal

Steven · June 10th, 2004, 01:35 AM

There's a wizard function that does what you want.

Open your form in Design View
Make sure you have the wizards turned
Put a command button on the form.

Choose "Record Operations"
then "Duplicate Record"
That will end up with this code:

Code:

On Error GoTo Err_Command1_Click


    DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
    DoCmd.DoMenuItem acFormBar, acEditMenu, 2, , acMenuVer70
    DoCmd.DoMenuItem acFormBar, acEditMenu, 5, , acMenuVer70 'Paste Append

Exit_Command1_Click:
    Exit Sub

Err_Command1_Click:
    MsgBox Err.Description
    Resume Exit_Command1_Click

Steven

I am a loud man with a very large hat. This means I am in charge

markw707 · June 10th, 2004, 09:02 AM

Awesome!!!

Kudos to you Steven and to the person at Microsoft who wrote the code.

Life is good.

Mark J. Weisberger

kbagley · August 29th, 2005, 10:09 AM

Trying to append a record that has an index with a unique ID? I'm using the 'Duplicate' button. I'd tried modifing it with ... Me.Record_Number = Me.Record_Number + "-new" ... But that doesn't work.

Appreciate the help.

Thanks,
Keith