How can I make File->Save , File->SaveAs Menu disabled?

[Zoo]

Hi,
Can I make File->Save and File->SaveAs Menu of Excel.exe disabled
by using any WIN32API or other ways?
Making them invisible is the best for me, but making them gray is also good
for me.
Thanks in advance.

(Win2000+Excel2002)

 

[Bob Phillips]

With Application.CommandBars("Worksheet Menu Bar").Controls("File")
.Controls("Save").Visible = False
.Controls("Save As Menu").Visible = False
End With

Don't forget to put them back.

--
HTH

Bob Phillips

(replace somewhere in email address with gmail if mailing direct)

 

[Chip Pearson]

.Controls("Save As Menu").Visible = False

should be

.Controls("Save As...").Visible = False

While these will disable the menu items, the user can still do a
Save with CTRL+S

To actually disable saving, put the following code in the
ThisWorkbook code module:

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel
As Boolean)
ThisWorkbook.Saved = True
Cancel = True
End Sub


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com

 

[Bob Phillips]

I didn't know what Save As Menu was, so assumed it was something 2003 (which
I don't use) <g>

--
HTH

Bob Phillips

(replace somewhere in email address with gmail if mailing direct)

 

[Zoo]

Thank you , Bob.
I'm happy to know that he solution is so much easier than I thought.
That helps me so much.