Amar,

This will hd all commandbars on opening and restore on close

Option Explicit

Private mFormulaBar

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim oCB As CommandBar
For Each oCB In Application.CommandBars
oCB.Enabled = True
Next oCB

Application.DisplayFormulaBar = mFormulaBar
End Sub

Private Sub Workbook_Open()
Dim oCB As CommandBar
For Each oCB In Application.CommandBars
oCB.Enabled = False
Next oCB

mFormulaBar = Application.DisplayFormulaBar
Application.DisplayFormulaBar = False
End Sub

'This is workbook event code.
'To input this code, right click on the Excel icon on the worksheet
'(or next to the File menu if you maximise your workbooks),
'select View Code from the menu, and paste the code



--

HTH

RP
(remove nothere from the email address if mailing direct)


"areddy" wrote in
message ...

Hello All,

I want to do some customization in excel.when I open new or existing
excel I don't want to display any menu bars, tool bars or no other
controls.
Just I want to display plain excel file with one button like showing in
the attachment.
If I click on button I want to open 'save as' window to save the file.

Except that I don't want to display any controls in the excel sheet...

Please see the attachment.

Thanks & Regards,
Amar...


+-------------------------------------------------------------------+
|Filename: display only button in excel..doc |
|Download: http://www.excelforum.com/attachment.php?postid=3969 |
+-------------------------------------------------------------------+

--
areddy
------------------------------------------------------------------------
areddy's Profile:
http://www.excelforum.com/member.php...o&userid=28204
View this thread: http://www.excelforum.com/showthread...hreadid=480523