I am building a MSAccess db where the backend data tables will sit on a network drive, and the front end will get distributed out to multiple users. To link the two I run a process at startup that loops through all the tables on the backend, linking the ones the are on the list of tables that I need linked. But it runs too long in testing on a user's machine. It is looping through all the hidden files, as well as the data tables. Is there a faster way to do this?
Function IsLinked(mytable As String) As Boolean
Dim obj1 As Access.AccessObject
'Returns True if table is in alltables
For Each obj1 In CurrentData.AllTables
If obj1.Name = mytable Then
IsLinked = True