Wiki der Access Code Library

Gemeinsam zu mehr Effizienz in der Anwendungserstellung

Sichtbarkeit einer Access-Tabelle

Aus Access Code Library
Version vom 13:36, 13. Nov. 2010 bei Josef Pötzl (Diskussion | Beiträge)
(Unterschied) ← Nächstältere Version | Aktuelle Version (Unterschied) | Nächstjüngere Version → (Unterschied)
Wechseln zu: Navigation, Suche

[Kategorie:Code-Schnippsel]

Function TableIsVisible(ByVal sTabName As String) As Boolean
   TableIsVisible = Not ((Application.CurrentData.AllTables.Item(sTabName).Attributes And 8) = 8)
End Function