Gemeinsam zu mehr Effizienz in der Anwendungserstellung
K (hat „Code-Schnipsel:Sichtbarkeit einer Tabelle“ nach „Sichtbarkeit einer Tabelle“ verschoben) |
K (hat „Sichtbarkeit einer Tabelle“ nach „Sichtbarkeit einer Access-Tabelle“ verschoben) |
Function TableIsVisible(ByVal sTabName As String) As Boolean TableIsVisible = Not ((Application.CurrentData.AllTables.Item(sTabName).Attributes And 8) = 8) End Function