Access - Cambiar nombre campo de tabla

DoCmd.RunSQL SELECT NOMBRE, APELLIDOS INTO TABLA2 (NAME, SURNAME) FROM TABLA1

MIRA EN INTERNET las instrucciones SQL  (LENGUAJE DE CONSULTA ESTRUCTURADO)

SELECT   Para seleccionar

INSERT  PARA GRABAR

DELETE   borrar

UPDATE  MODIFICAR

Where  para poner condiciones

ORDER BY  para ordenar por un dato

CREATE TABLE "nombre_tabla"

("columna 1" "tipo_de_datos_para_columna_1",

"columna 2" "tipo_de_datos_para_columna_2",

... );

CREATE TABLE Customer

(First_Name char(50),

Last_Name char(50),

Address char(50),

City char(50),

Country char(25),

Birth_Date datetime);

Dim dbs As Database

     Set dbs = CurrentDb

        dbs.Execute "CREATE TABLE Tabla2 " _

        & "(NAME CHAR, " _

        & "SURNAME CHAR, " _

        & "TELEFONO CHAR);"

  DoCmd.RunSQL "INSERT INTO Tabla2 ( NAME, SURNAME, telefono ) " _

  & "SELECT Tabla1.nombre, Tabla1.apellidos, Tabla1.telefono " _

  & "FROM Tabla1;"

DoCmd.RunSQL "Select NOMBRE as NAME, APELLIDOS As SURNAME, TELEFONO Into Tabla2 From Tabla1"