Checking if a Table Exists

B

Bas Cost Budde

Chaplain said:
How do I check programmatically to see if a table exists?
Thanks.
Click to expand...

air code:

function isTable(cName as string) as boolean
dim td as tabledef
on error resume next
set td=currentdb.tabledefs(cname)
isTable=(err=0)
set td=nothing
end function
 
C

Cheryl Fischer

From a post dated 2/12/2004 by Access MVP Ken Snell:

This function will return a true value if the table exists in the database;
false if not.

Public Function TableIsHere(strTableName As String) As Boolean
Dim tdf As TableDef
TableIsHere = False
For Each tdf in CurrentDb.TableDefs
If tdf.Name = strTableName Then TableIsHere = True
Next tdf
End Function
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Append Crosstab Query to Existing Table 0
Populate a table based on check box status 2
VBA to see if a Section exists in Word Document, and if it does, delete it 2
Can't make monthly payment for Outlook 0
add field to table 2
Microsoft Office Standard 2013 0
Adjusting the layout of over 1000 existing Word documents using a macro-driven batch run 0
How to check if a query exists and if it finds to delete 4

Top