Execute ribbons just in specific workbook

**The Intern** · 03-20-2011, 11:38 PM

Hello everyone,

as described in the title I want to use:

Sub Workbook_Open()

    Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",False)"
End Sub
Sub Workbook_BeforeClose(Cancel As Boolean)
Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",True)"
   
End Sub

to hide the ribbons. My problem is that they are executed in all open excel files. Is it possible to limit this to the file with the macro, so the ribbons are still there in the other workbooks?

Thanks in advance,

The Intern

**MarvinP** · 03-20-2011, 11:52 PM

Can't you use an if statement using the ActiveWorkbook.Name"
Something like:

Private Sub Workbook_Open()
    If ActiveWorkbook.Name = "HideDemToolBars" Then
        Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",False)"
    End If
End Sub

**The Intern** · 03-21-2011, 01:36 AM

Thanks,
my problem right now is that I don't know how:

Private Sub Workbook_Open()
    If ActiveWorkbook.Name = "HideDemToolBars" Then
       'whatever is in here
    End If
End Sub

works. I named the file and the sheet HideDemToolBars (just for a test) and nothing happend. What am I doing wrong?

**romperstomper** · 03-21-2011, 07:09 AM

You need to use the Workbook_Activate and Workbook_Deactivate events as well to re-show or hide the toolbar as you switch between workbooks.

**royUK** · 03-21-2011, 07:27 AM

I don't think it's a good idea to do this especially as you don't really know what events you should use. If anything goes wrong will you be confident to solve any issues?

Why not just use FullScreen

**The Intern** · 03-21-2011, 11:07 PM

Maybe you are right...my boss wanted my to hide the toolbar, but if it is that difficult I use the full screen. He wanted the file to look less like excel and more like a programm.
Anyway, thanks a lot for your help, I could at least deepen my excel knowledge.

**royUK** · 03-22-2011, 04:07 AM

I suspect the boss would yell the loudest if things did go wrong.

If you are satisfied with the solution(s) provided, please mark your thread as Solved.

How to mark a thread Solved
Go to the first post
Click edit
Click Go Advanced
Just below the word Title you will see a dropdown with the word No prefix.
Change to Solved
Click Save