Hide ribbon+command bars in 2003/2007 for specific file
 

I am developing a workbook for users that will be using excel 2003 and 2007.
I found code that will hide the ribbon and all command bars in both 2003 and
2007. Forgive the ignorance, but it seems to be happen to even new workbooks.
I only want to hide everything for my specific file and for no others. How do
I modify my code so that it only happens in my workbook and not in others
that are open at the same time. I thought by putting the code in
"ThisWorkbook" under the file it would only affect that specific file. Here
is my current code:

Private Sub Workbook_Open()
Application.DisplayFormulaBar = False
ActiveWindow.DisplayHeadings = False
Application.DisplayFullScreen = True
Application.DisplayStatusBar = False
End Sub

Private Sub Disable_Command_Bars_1()
'This will disable all Command bars
Dim Cbar As CommandBar
For Each Cbar In Application.CommandBars
Cbar.Enabled = False
Next
End Sub

(My goal is to hide all toolbars and ribbons, status bars, formula bars and
right-clicking etc whether in 2003 or 07 so that it looks like a form it it's
own window. I still want excel to work normally outside this file)

Hide ribbon+command bars in 2003/2007 for specific file
 

hi, !

ir you already have under control what to do (as mentioned in your post)...
try moving your "disabling" code in ThisWorkbook code-module to event: Workbook_WindowActivate
and the reverse actions (true to false and false to true) to the event: Workbook_WindowDeactivate

hth,
hector.

__ OP __
I am developing a workbook for users that will be using excel 2003 and 2007.
I found code that will hide the ribbon and all command bars in both 2003 and 2007.
Forgive the ignorance, but it seems to be happen to even new workbooks.
I only want to hide everything for my specific file and for no others.
How do I modify my code so that it only happens in my workbook
and not in others that are open at the same time.
I thought by putting the code in "ThisWorkbook" under the file it would only affect that specific file.
Here is my current code:

Private Sub Workbook_Open()
Application.DisplayFormulaBar = False
ActiveWindow.DisplayHeadings = False
Application.DisplayFullScreen = True
Application.DisplayStatusBar = False
End Sub

Private Sub Disable_Command_Bars_1()
'This will disable all Command bars
Dim Cbar As CommandBar
For Each Cbar In Application.CommandBars
Cbar.Enabled = False
Next
End Sub

(My goal is to hide all toolbars and ribbons, status bars, formula bars and right-clicking etc whether in 2003 or 07
so that it looks like a form it it's own window. I still want excel to work normally outside this file)

Hide ribbon+command bars in 2003/2007 for specific file
 

And if you hide the Ribbon in 2007 with RibbonX it will automatic work only for that workbook

--

Regards Ron de Bruin
http://www.rondebruin.nl/tips.htm




"Héctor Miguel" wrote in message ...
hi, !

ir you already have under control what to do (as mentioned in your post)...
try moving your "disabling" code in ThisWorkbook code-module to event: Workbook_WindowActivate
and the reverse actions (true to false and false to true) to the event: Workbook_WindowDeactivate

hth,
hector.

__ OP __
I am developing a workbook for users that will be using excel 2003 and 2007.
I found code that will hide the ribbon and all command bars in both 2003 and 2007.
Forgive the ignorance, but it seems to be happen to even new workbooks.
I only want to hide everything for my specific file and for no others.
How do I modify my code so that it only happens in my workbook
and not in others that are open at the same time.
I thought by putting the code in "ThisWorkbook" under the file it would only affect that specific file.
Here is my current code:

Private Sub Workbook_Open()
Application.DisplayFormulaBar = False
ActiveWindow.DisplayHeadings = False
Application.DisplayFullScreen = True
Application.DisplayStatusBar = False
End Sub

Private Sub Disable_Command_Bars_1()
'This will disable all Command bars
Dim Cbar As CommandBar
For Each Cbar In Application.CommandBars
Cbar.Enabled = False
Next
End Sub

(My goal is to hide all toolbars and ribbons, status bars, formula bars and right-clicking etc whether in 2003 or 07
so that it looks like a form it it's own window. I still want excel to work normally outside this file)

Hide ribbon+command bars in 2003/2007 for specific file
 

Works perfectly! Thank you!

"Héctor Miguel" wrote:

hi, !

ir you already have under control what to do (as mentioned in your post)...
try moving your "disabling" code in ThisWorkbook code-module to event: Workbook_WindowActivate
and the reverse actions (true to false and false to true) to the event: Workbook_WindowDeactivate

hth,
hector.

__ OP __
I am developing a workbook for users that will be using excel 2003 and 2007.
I found code that will hide the ribbon and all command bars in both 2003 and 2007.
Forgive the ignorance, but it seems to be happen to even new workbooks.
I only want to hide everything for my specific file and for no others.
How do I modify my code so that it only happens in my workbook
and not in others that are open at the same time.
I thought by putting the code in "ThisWorkbook" under the file it would only affect that specific file.
Here is my current code:

Private Sub Workbook_Open()
Application.DisplayFormulaBar = False
ActiveWindow.DisplayHeadings = False
Application.DisplayFullScreen = True
Application.DisplayStatusBar = False
End Sub

Private Sub Disable_Command_Bars_1()
'This will disable all Command bars
Dim Cbar As CommandBar
For Each Cbar In Application.CommandBars
Cbar.Enabled = False
Next
End Sub

(My goal is to hide all toolbars and ribbons, status bars, formula bars and right-clicking etc whether in 2003 or 07
so that it looks like a form it it's own window. I still want excel to work normally outside this file)