Dynamisk dannelse af tabelnavn

I think the only way you will be able to do this is building your SQL Dynamicaly from a form.

there is a simpåle example here which I think you could use with soem small modifications

http://www.eksperten.dk/spm/575625

so in the text field you add your table name

I was affraid you would suggest that. But is it possible to use an inputbox and a var. instead?

You can use an input box but it still requirs you to build the SQL dynamicaly

I will then build the SQL dynamicaly in an a module, no problem.

Thanx and Happy New Year

thanks and a Happy New Year to you too

I VBA kan du bruge en inputbox:

Dim db47 As Database
Dim tdfNew As TableDef
Dim a As String
On Error GoTo Errorhandler
a = InputBox(Prompt:="Indtast navnet på den nye tabel:", Title:="Opret ny tabel.", Default:="")
Set db47 = OpenDatabase("D:\XP\db47")
Set tdfNew = db47.CreateTableDef(a)
With tdfNew
.Fields.Append .CreateField("tekst", dbText, 30)
.Fields.Append .CreateField("memo", dbMemo)
.Fields.Append .CreateField("dato", dbDate)
.Fields.Append .CreateField("tal", dbInteger)
.Fields.Append .CreateField("tal1", dbLong)
.Fields.Append .CreateField("tal2", dbDouble)
db47.TableDefs.Append tdfNew
MsgBox "Tabellen:" & vbNewLine & vbNewLine & a & vbNewLine & vbNewLine & "er nu oprettet.", Title:="Udført."
End With
Errorhandler:
If Err = 3010 Then
MsgBox "Der findes allerede en tabel med dette navn." & vbNewLine & vbNewLine & "Procedüren forlades."
Else:
MsgBox Err.Description
End If