duplicate record

[maxmangion]

when creating a button using the wizard to duplicate a record, it creates a 3 line code using the DoCmd.MenuItem. Is there any code which supersedes this, since most of the DoCmd.MenuItem have become obsolete.

Thanks

 

[___]

    DoCmd.RunCommand acCmdSelectRecord
    DoCmd.RunCommand acCmdCopy
    DoCmd.GoToRecord , , acNewRec
    DoCmd.RunCommand acCmdPasteAppend

 

[maxmangion]

thx ...............