SELECT…INTO Statement (Microsoft Access SQL)
Creates a make-table query.
Syntax
SELECT field1[, field2[, …]] INTO newtable [IN externaldatabase] FROM source
The SELECT…INTO statement has these parts:
Part |
Description |
---|---|
field1, field2 |
The name of the fields to be copied into the new table. |
newtable |
The name of the table to be created. It must conform to standard naming conventions. If newtable is the same as the name of an existing table, a trappable error occurs. |
externaldatabase |
The path to an external database. For a description of the path, see the IN clause. |
source |
The name of the existing table from which records are selected. This can be single or multiple tables or a query. |
Remarks
You can use make-table queries to archive records, make backup copies of your tables, or make copies to export to another database or to use as a basis for reports that display data for a particular time period. For example, you could produce a Monthly Sales by Region report by running the same make-table query each month.
Note
-
You may want to define a primary key for the new table. When you create the table, the fields in the new table inherit the data type and field size of each field in the query's underlying tables, but no other field or table properties are transferred.
-
To add data to an existing table, use the INSERT INTO statement instead to create an append query.
-
To find out which records will be selected before you run the make-table query, first examine the results of a SELECT statement that uses the same selection criteria.
Example
This example selects all records in the Employees table and copies them into a new table named 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