The following code gives me an error:
Private Sub PRINT_Click()
On Error GoTo Err_PRINT_Click
DoCmd.RunSQL "INSERT INTO tblReport SELECT * FROM labels2006 WHERE Field='Something';"
DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
DoCmd.PrintOut acSelection...