Access - Recordsetclone

Hola a todos , necesito copiar en un registro nuevo todos los datos que tengo en el registro activo por medio de un boton..he tratado con todo y nada , estos son algunos de los que he probado....Agradezco a todos la atencion prestada
Me.Recordsetclone(CurrentRecord)
docmd.gotorecord,,acNewRec
Me.micampo=Recordsetclone!micampo

Dim cr As Recordset
Dim rec As Variant
rec = Me.Bookmark
Set cr = Me.RecordsetClone
cr.Find "micampo=" & rec
DoCmd.GoToRecord , , acNewRec
Me.Bookmark = cr.Bookmark

dim rec as variant
rec = Me.Bookmark
Me.RecordsetClone! (rec)
DoCmd.GoToRecord , , acNewRec
Me.Bookmark = rec.Bookmark

Crea un boton y pon el siguiente codigo
DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
DoCmd.DoMenuItem acFormBar, acEditMenu, 2, , acMenuVer70
DoCmd.DoMenuItem acFormBar, acEditMenu, 5, , acMenuVer70 'Paste Append

Muchas Gracias !!! Funciona de maravilla