A family of Microsoft relational database management systems designed for ease of use.
MS Access BUG problem solved re How to copy a record as a new record in MS 365 Access.
I take no credit for the code whatsoever, as it was found at
Replace
DoCmd.RunCommand acCmdSelectRecord
DoCmd.RunCommand acCmdCopy
DoCmd.RunCommand acCmdRecordsGoToNew
DoCmd.RunCommand acCmdSelectRecord
DoCmd.RunCommand acCmdPaste
With
DoCmd.RunCommand acCmdSelectRecord
DoCmd.RunCommand acCmdCopy
DoCmd.RunCommand acCmdRecordsGoToNew
DoEvents 'let Access finish moving to new record
'Optional micro-pause if needed
Dim t As Single: t = Timer
Do While Timer < t + 0.1
DoEvents
Loop
DoCmd.RunCommand acCmdSelectRecord
DoCmd.RunCommand acCmdPaste