Freigeben über

SELECT.INTO-Anweisung (Microsoft Access SQL)

  • Artikel

Gilt für: Access 2013, Office 2013

Erstellt eine make-table-Abfrage.

Syntax

SELECT Feld1[, Feld2[, …]] INTO newtable [IN externaldatabase] FROM source

Die Anweisung SELECT…INTO besteht aus den folgenden Teilen:

Teil Beschreibung
Feld1,Feld2 Die Namen der Felder, die in die neue Tabelle kopiert werden sollen.
neue_Tabelle Der Name der zu erstellenden Tabelle. Er muss den üblichen Benennungskonventionen entsprechen. Wenn neueTabelle denselben Namen wie eine bereits vorhanden Tabelle hat, tritt ein abfangbarer Fehler auf.
externeDatenbank Der Pfad zu einer externen Datenbank. Eine Beschreibung des Pfads finden Sie in der IN-Klausel .
source Der Name einer bereits bestehenden Tabelle, in der Datensätze ausgewählt werden. Dabei kann es es sich um eine oder mehrere Tabellen sowie eine Abfrage handeln.

Bemerkungen

Sie können make-table-Abfragen zur Archivierung von Datensätzen, Sicherung Ihrer Tabellen, Anlage von Kopien zum Export in eine andere Datenbank oder als Grundlage für Berichte auf Basis der Daten aus einem bestimmten Zeitraum verwenden. Beispielsweise könnten Sie mithilfe derselben make-table-Abfrage monatlich einen Bericht über die Verkäufe in diesem Monat nach Region erstellen.

Hinweis

  • Möglicherweise möchten Sie einen Primärschlüssel für die neue Tabelle definieren. Wenn Sie die Tabelle erstellen, erben die Felder in der neuen Tabelle den Datentyp und die Feldgröße jedes Felds in den zugrunde liegenden Tabellen der Abfrage, aber keine anderen Feld- oder Tabelleneigenschaften werden übertragen.
  • Um einer bereits bestehenden Tabelle Daten hinzuzufügen, verwenden Sie die INSERT INTO-Anweisung anstelle einer Anfügeabfrage.
  • Um herauszufinden, welche Datensätze ausgewählt werden, bevor Sie die make-table-Abfrage ausführen, führen Sie erst einmal eine SELECT-Anweisung mit denselben Auswahlkriterien aus.

Beispiel

In diesem Beispiel werden alle Datensätze in der Tabelle "Employees" ausgewählt und in eine neue Tabelle namens "Emp Backup" kopiert.

    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