(19/01/2020, 19:23)ozanakkaya yazdı:

Dim db as Database

Dim td as TableDef

Set db = CurrentDb()

For Each td In db.TableDefs

  MsgBox td.Name

Next td

Bu kodu denemiştim ve alttaki kod satırında hata vermişti yine verdi hatayı.

Dim db As Database


Alttaki içinde çözüm varmı?

Alıntı:ve Forms ("xx") form için böyle kod varken tablo içinde varmı aynu yöntem?