I am stumped.

I have added a button to my form with the following code. When I run the code I get the "Paste Error" message.

Private Sub Command1666_Click()
On Error Resume Next
PlaySound "H:\Generald\media\carbo.wav", ByVal 0&, SND_FILENAME Or SND_ASYNC


On Error GoTo Err_Command1666_Click


DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
DoCmd.DoMenuItem acFormBar, acEditMenu, 2, , acMenuVer70
DoCmd.DoMenuItem acFormBar, acEditMenu, 5, , acMenuVer70 'Paste Append

Exit_Command1666_Click:
Exit Sub

Err_Command1666_Click:
MsgBox Err.Description
Resume Exit_Command1666_Click


End Sub



Access 2000
Records that " " was unable to paste have been inserted into a new table called paste errors.

Thanks

Carbo