Unhide tables in Access 2013 Database

We used some vba code to hide some tables in an Access 2013 database.  We can't figure out the code to unhide them.

Here is the code we used to hide them.

Sub HideAll()
CurrentDb.TableDefs("Detail").Attributes = dbHiddenObject
CurrentDb.TableDefs("Intersections").Attributes = dbHiddenObject
End Sub
LVL 1
upsfaAsked:
Who is Participating?
 
upsfaConnect With a Mentor Author Commented:
Never mind.  Found it.
Sub showme()
'CurrentDb.TableDefs("Detail").Attributes = CurrentDb.TableDefs("Detail").Attributes And Not CurrentDb.TableDefs("Detail").Attributes
CurrentDb.TableDefs("Intersections").Attributes = CurrentDb.TableDefs("Intersections").Attributes And Not CurrentDb.TableDefs("Intersections").Attributes
End Sub
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.