方法一：  
   
   
   
    在执行docmd.runsql前面先用   docmd.setwarnings   false   屏蔽掉提示，查询执行完成后再打开提示功能。  
   
  Docmd.setwarnings   false  
  docmd.runsql   "insert   into   tbale1   from   table2"  
  docmd.setwarnings   true    
   
   
     
   
     
   
   
  方法二：  
   
   
   
    直接用   connection对象来执行，比如：  
  currentproject.connection.execute   "insert   into   tbale1   from   table2"    
   
   
  currentdb.execute   "insert   into   tbale1   from   table2"    
   
     
   
     
   
   
  方法三：  
   
   
   
    如果你实在不会编程，也可以这样做  
  菜单   ->   工具   ->   选项   ->   编辑/查找   ->   去掉“记录更改”和“删除文档”的勾  
  这样就没有提示了。