Accesteki tablo adları nasıl bulunuyor.
Not:Ado schmea ile olmayacak.
Alttaki gibi kod var lakim Msy gibi gizli tablo adlarınıda gösteriyor bu sorun if ve Left gibi olayları ile çözülür lakin başka yolu varmıdır?
Kod:
Dim obj As AccessObject, dbs As Object
Set dbs = Application.CurrentData
For Each obj In dbs.AllTables
MsgBox obj.Name
Next obj