View Single Post
  #5   Report Post  
Posted to microsoft.public.excel.misc
Gord Dibben
 
Posts: n/a
Default Disable Editing tool bars

Mike

In the Sub workbook_open add this line

Application.DisplayFormulaBar = False

Change to = True in the Sub workbook_beforeclose


Gord

On Thu, 8 Dec 2005 14:15:03 -0800, "Mike Rogers"
wrote:

Gord, Thanks a ton...it works!!! (but you knew it would)

One more question, and I know there may not be an answer. The formula bar
can be removed via tools/options etc. If the user has this selected for
their perferences can I un-select it some how when running my application and
the put it back when my application is closed.

"Gord Dibben" wrote:

Mike

Take the code out of the standard module and place it in the Thisworkbook
module.

To disable the right-click menu.......

Application.CommandBars("Cell").Enabled = False


Gord Dibben Excel MVP

On Wed, 7 Dec 2005 19:15:03 -0800, "Mike Rogers"
wrote:

I posted the other day and got some direction. Thank you Peter Ellis. Now I
need some help with what I found. I found a set of macros that should
disable on opening, and enable on closing. The problem is they don't work
and I am not literate in macro syntax. I have researched and all I have found
says they should work. Here is what I am trying to work with:

Private Sub Workbook_Open()
Application.CommandBars("Worksheet Menu Bar").Enabled = True
Application.CommandBars("Standard").Enabled = False
Application.CommandBars("Formatting").Enabled = False
End Sub
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.CommandBars("Worksheet Menu Bar").Enabled = True
Application.CommandBars("Standard").Enabled = True
Application.CommandBars("Formatting").Enabled = True
End Sub
This is in a standard module.

I also nee to encorporate code to stop "copy & Paste from working, or at
least the window that come from a right mouse click.

Mike Rogers