Access Tools Menu Disabled

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

I Recently joined a workgroup as part of a project for a client, now whenever
I open acces or any of my databases the Tools menu is locked / disabled /
greyed out. I am using Access 2003 SP1. I have changed back to a new standard
system .mdw file and then the original one. I don't see any admin login
interface or anything? How do I get my Access back?
 
DavidQuaid said:
I Recently joined a workgroup as part of a project for a client, now
whenever
I open acces or any of my databases the Tools menu is locked / disabled /
greyed out. I am using Access 2003 SP1. I have changed back to a new
standard
system .mdw file and then the original one. I don't see any admin login
interface or anything? How do I get my Access back?
Click to expand...

Hold the shift key down when you open your app.

Keith.
www.keithwilby.com
 
Hi Kevin,

I was afraid I get that response! unfortunately it occurs even if I'm not
opening an app or a any database. It's just permanently disabled whether or
not I hold down shift key. It's not an application that's doing this.
 
Have you tried resetting your menu?

It may be that one of the other Access apps you were working with disabled
some built-in menu items on start up but didn't have the courtesy to restore
them on exit (or crashed before it had a chance to), so you'll have to do it
manually.

-View>Toolbars>Customize (or right-click in the menu area & select
Customize)
-On the Toolbars tab of the resulting dialog, select "Menu Bar" (and be sure
it's checked)
-Click Reset

Hopefully that will restore your missing functionality.

HTH,
 
DavidQuaid said:
Hi Kevin,
Who?


I was afraid I get that response! unfortunately it occurs even if I'm not
opening an app or a any database. It's just permanently disabled whether
or
not I hold down shift key. It's not an application that's doing this.
Click to expand...

Can you right-click the menu bar and select "customize"?

Keith.
 
Hi George,

This doesn't work at all. Tried resetting it and defaulting. When I open or
create a new db, I can't even "Save As" or export or anything. I've reset the
menu a few times, restarted access. I think it's something to do with the mdw
I joined.
 
Sorry Keith for incorrect address.

Yes, I can click customize. I see the toolbars, commands and menu usage
(which I presume relates to hiding used/unused components)
 
Hi George,

Thanks, I'm afraid not. Tried resetting it. Doesn't change. Even ticked the
"Show full menus"
 
George's suggestion sounds on track to me. If you can't reset the
option availabilities via the standard Access user interface, try it
through code. (Look up the Enabled & Visible properties of the
CommandBar(s?) object.)

There's no way your reported symptoms would be due to the workgroup
file, IMHO. If you think that they are, just re-join the standard
workgroup file & try again. Or rename the current file to ..._saved,
and see if Access creates a new one.

HTH,
TC
 
Dear TC,

Unfortunately they all show up as Enabled and Visible. The tools menu is
looking disabled though and I cannot access any security features. I had
tried renaming the default MDW file but alas, no good!
 
Actually, the tools menu is showing up as Visible=False, but when I try to
sedt it to true I get an automation error.
 
Um, hard to comment if you do not show us the code or state the exact
error message!

Show the code, and state the exact error message.

TC
 
Hi TC,

Thank you for taking an interest in my problem:

error:Method 'Visible' of object 'CommandBar' failed -2147467259

code: (inside a cmd button)

Set cbar = Application.CommandBars("Tools")

If cbar.Enabled = False Then MsgBox ("CBAR Disabled")
If cbar.Visible = False Then
MsgBox ("CBAR hidden")
cbar.Protection = msoBarNoChangeDock
cbar.Enabled = True
cbar.Visible = True
End If



For Each ctrl In cbar.Controls
If ctrl.Enabled = True Then
Me.List0.AddItem ctrl.Caption & "- Enabled"
Else
Me.List0.AddItem ctrl.Caption & "- disabled"
End If
Next
 
Sorry David, it's still tough to comment without knowing what any of
those outputs were. (I don't know if the commandbar was enabled, not
enabled, & so on.)

Not trying to be difficult. Just trying to gather the information
necessary to make an informed suggestion.

Run the following code & tell me what it displays:

(untested)

dim cbar as object, ctrl as object
Set cbar = Application.CommandBars("Tools")
debug.print 1, cbar.enabled
debug.print 2, cbar.visible
for each ctrl in cbar.controls
debug.print 3, cbar.caption
debug.print vbtab; cbar.enabled
debug.print vbtab; cbar.visible
next
set cbar = nothing

If any line fails with a runtime error, make this change to that line:

on error resume next
(the line in question)
debug.print err.number,err.description
on error goto 0

More on the commandbar object:


http://msdn.microsoft.com/library/default.asp?url=/library/en-us/vbaof10/html/ofobjCommandBars.asp

HTH,
TC
 
Back
Top