Forum Discussion

demaionewton's avatar
demaionewton
Copper Contributor
Nov 04, 2022

Cloning a record works ONLY if I add a MsgBox

I have a very simply VBScript that clones a record taken almost step-by-step from an Access Macro.  Here's the copy:

DoCmd.RunCommand acCmdSelectRecord
DoCmd.RunCommand acCmdCopy
DoCmd.RunCommand acCmdRecordsGoToNew
DoCmd.RunCommand acCmdSelectRecord
MsgBox ("Go on")
DoCmd.RunCommand acCmdPasteAppend

 

Without the MsgBox, I get an error that says the Append command isn't available now.  However, if I have the MsgBox and click OK the script runs fine.  What do I need to do so that I don't need the MsgBox?  I can't figure out why it's throwing the error without the message box.  Ideas?

  • Did a bit of research and found that I don't need the 2 lines:
    DoCmd.RunCommand acCmdRecordsGoToNew
    DoCmd.RunCommand acCmdSelectRecord
    These don't seem to be necessary. Removing them and the MsgBox eliminates the bug.
  • demaionewton's avatar
    demaionewton
    Copper Contributor
    Did a bit of research and found that I don't need the 2 lines:
    DoCmd.RunCommand acCmdRecordsGoToNew
    DoCmd.RunCommand acCmdSelectRecord
    These don't seem to be necessary. Removing them and the MsgBox eliminates the bug.

Resources