done. I amended the code by creating rst to find record which = id
Public Function duplicate_Record(rst As Recordset, ID As Long) As Long ' returns the ID of the new record
rst.FindFirst "ID = " & ID
Dim clone As Recordset: Set clone = rst.clone
Dim f As Variant ' iterate...
Re: Copy record to new record using Recordset.Clone
Thanks Aeristan for your valuable input.
May I know how to refer the rst from the main form.
When I made rst = CurrentDb.OpenRecordset "Table Name" it go to first record.
Thanks in advance for your assistance.
Regards,