Mittels VBA eine Abfrage in der Datenbank hinzufügen

[hajott]

Hallo Wissende,

im Internet finde ich nur, wie man eine Tabelle erstellt und der Datenbank hinzufügt.

Geht das auch mit einer Abfrage und wenn ha, wie? (SQL-Statement gebe ich dann an)

Vielen Dank im voraus

Hans-Jürgen

[werner budde]

Code [Auswählen] Erweitern

Sub Neue_Abfrage()

Dim qry_Test As QueryDef
Set qry_Test = CurrentDb.CreateQueryDef("Dein SQL_Statement")

End Sub

[Knobbi38]

So etwas geht auch per DDL.

Code [Auswählen] Erweitern

Public Sub CreateViewDDL()
    'Purpose:   Create a new query using DDL.
    Dim strSql As String
   
    strSql = "CREATE VIEW qryBez as SELECT ID, Bezeichnung FROM tblBez" _
           & " WHERE ID<3;"
    CurrentProject.Connection.Execute strSql
    RefreshDatabaseWindow
End Sub

Knobbi38

[hajott]

Herzlichen Dank euch beiden!