auto fill new record

[BBRAZEAU]

I have a table which has a finite number(43) of records at the begining. Any subsequent records I add will always be derived from starting with one of these 43 records and altering certain fields to form new records.
I have a form containing only the fields I want to allow to be edited.I would like to be able to navigate to one of those 43 records and copy all its fields (not just the ones shown on the form ) and use them to make a new record. I could then edit the fields allowed on form and have a new unique record. If anyone can help or point me twords the right functions I would appreciated it.

 

[BBRAZEAU]

I have been able to create a button that copies the exsisting record and appends it to the end of the table as a new record. Here is the code:

Private Sub Command2_Click()
On Error GoTo Err_Command2_Click
DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
DoCmd.DoMenuItem acFormBar, acEditMenu, 2, , acMenuVer70
DoCmd.DoMenuItem acFormBar, acEditMenu, 5, , acMenuVer70 'Paste Append

Exit_Command2_Click:
Exit Sub

Err_Command2_Click:
MsgBox Err.Description
Resume Exit_Command2_Click

End Sub

However it only copies the data that is shown on the form. How do I get it to copy all the fields not just the ones displayed on the form?Please help.