You are missing the Dots inside the With structure ... dots in from of the four commands
With DoCmd
.SetWarnings False
.DeleteObject acTable, "tbl_CustomerConcernsCopy"
.OpenQuery "qry_CustomerConcerns" ' Prompt will occur here
.SetWarnings True
End With