Hallo Leute,
noch eine Frage:
Ich versuche mit einer Schleife Tabellen einzurichten.
Dabei soll der Name der Tabelle immer Lauten:„Tabelle1“, „Tabelle2“ usw.
Mein Code funktioniert aber nicht. Bitte um Hilfe - Danke !
Do
x = 1
db.Execute „CREATE TABLE [Tabelle &(x)]“ & „(Rolle CHAR, Kosa CHAR);“
x = x + 1
db.Close
Loop
Christian
VBA-Fehler
Moin,
&(x) ist Bestandteil eines Literals und wird deshalb - völlig korrekt - nicht übersetzt. Schreib statt dessen
[Literal_Vorspann] & x & [Literal_Nachspann]
Gruß Ralf
Moin Ralf,
[Literal_Vorspann] & x & [Literal_Nachspann]
klappt leider auch nicht.
Meldung Fehler 3290
Syntaxfehler in CREATE TABLE - Anweisung
Beim ersten durchlauf wird eine Tabelle mit Namen „Tabelle & x &:Tabelle“ eingerichtet und beim zweiten Durchlauf der Schleife meckert das System natürlich dass es die Tabelle bereits gibt !
Klar, zählt ja auch nicht weiter, geschweige denn wird 1 statt x erkannt.
Hast Du noch einen Tipp ?
Christian
Hallo,
Moin Ralf,
[Literal_Vorspann] & x & [Literal_Nachspann]
klappt leider auch nicht.
Meldung Fehler 3290
Syntaxfehler in CREATE TABLE - AnweisungBeim ersten durchlauf wird eine Tabelle mit Namen „Tabelle & x
&:Tabelle“ eingerichtet und beim zweiten Durchlauf der
Schleife meckert das System natürlich dass es die Tabelle
bereits gibt !
Klar, zählt ja auch nicht weiter, geschweige denn wird 1 statt
x erkannt.
Hast Du noch einen Tipp ?
Ein bisschen unklare Geschichte…
Neben der Syntax ist der Sinn einer solchen Massengenerierung von Tabellen mit gleicher Struktur zu hinterfragen…
Dim i as Long, db as Database
Set db=Currentdb
For i= 1 to 10 ' oder wieviel auch immer
db.Execute "CREATE TABLE Tabelle" & i & " (Rolle CHAR, Kosa CHAR)"
Next
set db=Nothing
Gruß
Franz, DF6GL
10000 - Dank Franz !
Gruß Christian