请教了

利用生成表查询，其Sql代码为：

一般格式：SELECT 字段列表 INTO 新表名 FROM 原表名 WHERE 条件表达式;;

SELECT 原表名.[字段名1],原表名.[字段名2],..... INTO 新表名 FROM 原表名;

例：将表1中销售部的id,姓名,部门等字段复制到一个新表（表2）中
其SQL语句为：SELECT 表1.[id], 表1.[姓名], 表1.[部门] INTO 表2 FROM 表1 WHERE 表1.[部门]='销售部';

在命令按钮中执行
Private Sub Command4_Click()
'例：将表1中销售部的id,姓名,部门字段复制到一个新表（表2）中
SQL = "SELECT 表1.[id], 表1.[姓名], 表1.[部门] INTO 表2 FROM 表1 表1.[部门]='销售部';"
DoCmd.RunSQL (SQL)
End Sub
当然，条件可有可无。