Re: dbhiddenobject doesnt work

Try AND-ing the attribute to the constant:

If (CurrentDb.TableDefs(i).Attributes And dbHiddenObject) <> 0 Then

--
Allen Browne - Microsoft MVP. Perth, Western Australia
Tips for Access users - http://allenbrowne.com/tips.html
Reply to group, rather than allenbrowne at mvps dot org.

"thread" wrote in message
news:2b1b7b65-4364-41fa-b49b-eb8a5c942b73@s8g2000prg.googleg roups.com...
>
> i'm trying to hide by database with this code:
> Application.CurrentDb.TableDefs(CurrentDb.TableDefs(i).Name) .Properties("Attributes").Value
> = dbhiddenobject
>
> from some reason it doesnt work
> the table are not hidden,does anyone have an idea what can cause this
> problem?