Instrucción SELECT…INTO (Microsoft Access SQL)

Se aplica a: Access 2013, Office 2013

Crea una consulta de creación de tabla.

Sintaxis

SELECT campo1[, campo2[, …]] INTO newtable [IN externaldatabase] FROM source

La instrucción SELECT…INTO consta de los siguientes elementos:

Elemento	Descripción
field1,field2	El nombre de los campos que se van a copiar en la nueva tabla.
newtable	El nombre de la tabla que se va a crear. Debe seguir las convenciones de nomenclatura estándar. Si nuevaTabla es la misma que el nombre de una tabla existente, se produce un error capturable.
externaldatabase	La ruta de acceso a una base de datos externa. Para obtener una descripción de la ruta de acceso, vea la cláusula IN .
source	El nombre de la tabla existente de la que se seleccionan los registros. Puede ser una o varias tablas, o una consulta.

Comentarios

Puede usar consultas de creación de tabla para archivar registros, crear copias de seguridad de las tablas o realizar copias para exportarlas a otra base de datos o usarlas como base para informes que muestren datos de un período de tiempo determinado. Por ejemplo, puede generar un informe de ventas mensuales por región ejecutando la misma consulta de creación de tabla cada mes.

Nota:

• Puede que desee definir una clave principal para la nueva tabla. Al crear la tabla, los campos de la nueva tabla heredan el tipo de datos y tamaño de campo de cada campo de las tablas base de la consulta, pero no se transfiere ninguna otra propiedad de campo o tabla.
• Para agregar datos a una tabla existente, use la instrucción INSERT INTO en lugar de crear una consulta de datos anexados.
• Para averiguar qué registros se seleccionarán antes de ejecutar la consulta de creación de tabla, examine primero los resultados de una instrucción SELECT que use los mismos criterios de selección.

Ejemplo

Este ejemplo selecciona todos los registros de la tabla Empleados y los copia en una nueva tabla llamada Emp Backup.

    Sub SelectIntoX() 
     
        Dim dbs As Database 
        Dim qdf As QueryDef 
     
        ' Modify this line to include the path to Northwind 
        ' on your computer. 
        Set dbs = OpenDatabase("Northwind.mdb") 
     
        ' Select all records in the Employees table  
        ' and copy them into a new table, Emp Backup. 
        dbs.Execute "SELECT Employees.* INTO " _ 
            & "[Emp Backup] FROM Employees;" 
             
        ' Delete the table because this is a demonstration. 
        dbs.Execute "DROP TABLE [Emp Backup];" 
         
        dbs.Close 
     
    End Sub