Prüfen der Tabellennamen

[Sonic83]

Hallo!

Ich bin grad auf ein Problem gestoßen. Ich muss meine die Tabellennamen in meiner Datenbank auf einen bestimmten Namen vergleichen. Jetzt komm ich nicht drauf wie ich den Namen abprüfen kann. Es muss doch sowas wie die Art geben:

For Each Table in CurrenDB

if Table.Name = "Test" Then MsgBox "Gefunden"

next

Leider hab ich so schon alles probiert. Kann mir da vielleicht jemand weiterhelfen???

Gruß Sonic83

[Meenzer]

Hallo!

Probiers mal so:

dim td1 as tabledef

For i = 0 To Currentdb.TableDefs.Count - 1

Set td1 = db1.TableDefs(i)

if td1.name = "DEINE TABELLE" Then msgbox "Gefunden"

Next i

GRuss