tabelmaakquery in vba

[scarie]

Hello, weer een vraagje...
Ik zou graag een tabelmaakquery uitvoeren in vba, maar de naam van de tabel zou een variabele moeten zijn.
Het volgende werkt perfect:

Dim db As Database
Dim rs As Recordset
Dim sql As String
Set db = CurrentDb()
sql = " SELECT * INTO test from mijnquery;"
DoCmd.RunSQL sql
Set rs = db.OpenRecordset(sql, dbOpenDynaset)

De tabel "test" wordt nu gemaakt maar dit wil ik niet, ik wil namelijk dat de gebruiker zelf de naam van de tabel kan kiezen door een tekstveld in te vullen in het formulier.

Dus heb ik al het volgende :

Dim db As Database
Dim rs As Recordset
Dim sql As String
Set db = CurrentDb()
Dim strname As String
strname = Me.Tekst15
sql = " SELECT * INTO ?????? from mijnquery;"
DoCmd.RunSQL sql
Set rs = db.OpenRecordset(sql, dbOpenDynaset)

Wie kan mij helpen met de juiste syntax in te vullen op de plaats van de vraagtekens?
Dus "me.tekst15" is het veld dat de gebruiker invult.
Deze procedure wordt uitgevoerd na het indrukken van een knop.

Op voorhand bedankt

Scarie

 

[femda-punt-com]

sql = " SELECT * INTO " & strname & " from mijnquery;"

 

[scarie]

Bedankt voor het antwoord, maar dit lukt niet. Had ik al geprobeerd.

Scarie

 

[Bartuls]

Je kunt beter gewoon een CREATE TABLE statement samenstellen.
Zie http://www.1keydata.com/sql/sqlcreate.html

De truuk met & strname & zul je daar overigens ook in toe moeten passen. Daarmee maak je je tabelnaam variabel.

 

[scarie]

Bedankt voor het antwoord Barthuls, maar ik vond het nogal ingewikkeld aan het worden ... ik heb het op een andere manier opgelost n.l.

Dim db As Database
Dim rs As Recordset
Dim sql As String
Set db = CurrentDb()
Dim strname As String
strname = Me.Tekst15
sql = " SELECT * INTO tijdelijketabel from mijnquery;"
DoCmd.RunSQL sql
Set rs = db.OpenRecordset(sql, dbOpenDynaset)
DoCmd.Rename strname, acQuery, "tijdelijketabel"

Ik heb er wel een beetje moeten op zoeken omdat ik telkens het volgende progammeerde:

DoCmd.Rename strname, acTabel, "tijdelijketabel"

En dit functioneerde niet omdat , denk ik, een tabelmaakquery gebeurde in de sql.

Weer een stapje verder maar toch bedankt voor de reacties

Scarie