SELECT.INTO, instruction (Microsoft Access SQL)

S’applique à : Access 2013, Office 2013

Crée une requête Création de table.

Syntaxe

SELECT champ1[, champ2[, …]] INTO newtable [IN externaldatabase] FROM source

L’instruction SELECT...INTO comprend les parties suivantes :

Élément	Description
field1,field2	Noms des champs à copier dans la nouvelle table.
newtable	Nom de la table à créer. Ce nom doit respecter les conventions d'affectation de nom standard. Sinouvelletable est identique au nom d'une table existante, une erreur interceptable se produit..
basededonnéesexterne	Chemin d'accès à une base de données externe. Pour obtenir une description du chemin d’accès, consultez la clause IN .
source	Nom de la table dans laquelle des enregistrements sont sélectionnés. Il peut s’agir d’une ou plusieurs tables, ou d’une requête.

Remarques

Vous pouvez utiliser les requêtes Création de table pour archiver les enregistrements, faire des copies de sauvegarde des tables, ou pour faire des copies à exporter dans une autre base de données ou à utiliser pour produire des états concernant des données sur une période déterminée. Par exemple, vous pouvez produire un état Ventes Mensuelles par Région en exécutant la même requête Création de table chaque mois.

Remarque

• Vous pouvez définir une clé primaire pour la nouvelle table. Lorsque vous créez la table, ses champs héritent du type de données et de la taille de champ de chaque champ présent dans les tables sous-jacentes de la requête, mais aucune autre propriété de champ ou de table n'est transférée.
• Pour ajouter des données à une table existante, utilisez l'instruction INSERT INTO au lieu de créer une requête Ajout.
• Pour déterminer les enregistrements qui seront sélectionnés avant d’exécuter la requête Création de table, commencez par examiner les résultats d’une instruction SELECT qui utilise les mêmes critères de sélection.

Exemple

Cet exemple sélectionne tous les enregistrements de la table Employees et les copie dans une nouvelle table nommée 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