VBA Access Table check

[thegameoflife]

Is it possible in Access to use code to check for existence of a table?

If so do you have an example?

 

[jebry]

Hi!

Probably the simplest way is to try to open the table and trap the error that occurs (probably Object does not exist you can do tests to find out). You can then run code or print a message depending on why you are checking.

hth
Jeff Bridgham
bridgham@purdue.edu

 

[thegameoflife]

Here is how you do it in code

Sub listaccesstables()
Dim catdb As ADOX.Catalog
Dim tblList As ADOX.Table

Set catdb = New ADOX.Catalog

catdb.ActiveConnection = CurrentProject.Connection


For Each tblList In catdb.Tables
    If tblList.Name = "Chip_Extract" Then
        MsgBox tblList.Name
    End If
Next

Set catdb = Nothing


End Sub