Make excel look less like excel!

Hi, i have created a dashboard for sales managers to use.

I now want to give them the look and feel of something not so excel

i have attached a screen shot of how it looks, i need suggestions for how to not display the tool bar and maybe the task bar - so excel jumps out more like an interactive PDF than an excel workbook

Thanks
Capture.PNG
Seamus2626Asked:
Who is Participating?
I wear a lot of hats...

"The solutions and answers provided on Experts Exchange have been extremely helpful to me over the last few years. I wear a lot of hats - Developer, Database Administrator, Help Desk, etc., so I know a lot of things but not a lot about one thing. Experts Exchange gives me answers from people who do know a lot about one thing, in a easy to use platform." -Todd S.

Steven HarrisPresidentCommented:
You can start with a view easy tweaks, such as hiding the Formula Bar and Headings from the View Tab.

Then if you want to get more creative, use the following VBA command to force Excel into Full Screen Mode while hiding the toolbar. (Workbook_Open)

Application.DisplayFullScreen = True
Application.CommandBars.ActiveMenuBar.Enabled = False

Then, unload the options on exit (Workbook_BeforeClose):

Application.DisplayFullScreen = False
Application.CommandBars.ActiveMenuBar.Enabled = True

Insert the following in a new Module (after hiding the views mentioned above):

Private Sub Workbook_Open()
    Application.DisplayFullScreen = True
    Application.CommandBars.ActiveMenuBar.Enabled = False
End Sub

Private Sub Workbook_BeforeClose()
    Application.DisplayFullScreen = False
    Application.CommandBars.ActiveMenuBar.Enabled = True
End Sub

Open in new window

0
ProfessorJimJamCommented:
you can easily turnoff the riboon and the sheets tab.

look at the links below

http://ms-office.wonderhowto.com/how-to/completely-hide-ribbon-menu-excel-338610/   to turnoff ribbon

http://excelribbon.tips.net/T007359_Turning_Off_Worksheet_Tabs.html  to turn off the sheet tabs
0
Seamus2626Author Commented:
Is there anyway to hide that horrible task bar on the bottom of the PC, so that the excel sheet takes up the entire screen?
0
Cloud Class® Course: Microsoft Azure 2017

Azure has a changed a lot since it was originally introduce by adding new services and features. Do you know everything you need to about Azure? This course will teach you about the Azure App Service, monitoring and application insights, DevOps, and Team Services.

Steven HarrisPresidentCommented:
Are you referring to the Windows Task bar?
0
Seamus2626Author Commented:
Yes!
0
Steven HarrisPresidentCommented:
There are some routines to hide the Windows Task Bar, although I have not tested them with Excel's Full Screen mode. In case you are not familiar with VBA, I will give the full rundown:

While in the workbook, hit Alt+F11 to open the VBA Editor.

Go to Insert > New Module

On the new Module Page add the following code:
Private Declare Function FindWindowEx& Lib "user32" Alias "FindWindowExA" _
(ByVal hWnd1&, ByVal hWnd2&, ByVal lpsz1$, ByVal lpsz2$)
Private Declare Function ShowWindow& Lib "user32" (ByVal hwnd&, ByVal nCmdShow&)

Private Sub Workbook_Open()
    ShowWindow FindWindowEx(0, 0, "Shell_TrayWnd", vbNullString), 0
    Application.DisplayFullScreen = True
    Application.CommandBars.ActiveMenuBar.Enabled = False
End Sub

Private Sub Workbook_BeforeClose()
    ShowWindow FindWindowEx(0, 0, "Shell_TrayWnd", vbNullString), 5
    Application.DisplayFullScreen = False
    Application.CommandBars.ActiveMenuBar.Enabled = True
End Sub

Open in new window


After you have added the code, click somewhere in the Workbook_Open code, then hit F5.  This will then demo the Workbook_Open event.

To 'exit', click somewhere in the Workbook_BeforeClose code, then hit F5.  This is the event that runs when the workbook is closed (to reset the settings to normal).
0
Seamus2626Author Commented:
Ya im familiar with VB, so i put that in the this workbook sheet and received the

"Procedure does not match description of event or procedure having the same name"

Thanks
0
Steven HarrisPresidentCommented:
Attached is an alternative solution, tested in Win8.1 running Office 2013.

Let me know if this works and we can modify for you as needed.
Kiosk-Mode.xlsm
0
Steven HarrisPresidentCommented:
so i put that in the this workbook sheet
The code you tested would have gone in a Module, not Worksheet.

Try the above attached solution and let me know how it works.
0
Seamus2626Author Commented:
The ones with the buttons is perfect, but can you reupload with amended code so i dont have to press the buttons - on open it will hide taskbar and then on close, reset

Thanks!
0
Steven HarrisPresidentCommented:
Kiosk Mode enabled on Workbook_Open

Kiosk Mode disabled (return to regular view) on Workbook close (BeforeClose event).

Remember to disable the Gridlines, Headings and Formula Bar under the View Tab first for the applicable worksheets.

To Test:
1. Open a regular worksheet to view current Excel View Settings, then close
2. Open the Auto Kiosk Mode file to view Kiosk Settings, then close
3. Open a regular worksheet to view Excel settings are back to normal
Kiosk-Mode--auto-.xlsm
0

Experts Exchange Solution brought to you by

Your issues matter to us.

Facing a tech roadblock? Get the help and guidance you need from experienced professionals who care. Ask your question anytime, anywhere, with no hassle.

Start your 7-day free trial
Seamus2626Author Commented:
perfect!!!!
0
ProfessorJimJamCommented:
one small issue i am facing.  

i get error on Ln 35 AppActivate Application.Caption

Run time error 5

invalid procedure call or arg
0
ProfessorJimJamCommented:
Seamus2626 be very careful with this, as any user who opens this workbook, the taskbar getts disappeared and the workbook close event does not get it fixed.  so task bar cannot be restored to normal.

Private Sub Workbook_BeforeClose(Cancel As Boolean)
    Application.ScreenUpdating = False
    SystemParametersInfoA 47, 0, Desktop, 0
    ShowWindow hwnd, 8
    Application.WindowState = xlNormal
    Application.WindowState = xlMaximized
    Application.DisplayFullScreen = False
    Application.CommandBars.ActiveMenuBar.Enabled = True
End Sub
0
Steven HarrisPresidentCommented:
ProfessorJimJam, what line are you erring on?

Also, the Close Event does unload the Kiosk mode, which can be verified with testing as I mentioned.
0
ProfessorJimJamCommented:
I get error




ProfessorJimJam2014-10-24 at 16:40:36ID: 40402230
one small issue i am facing.  

i get error on Ln 35 AppActivate Application.Caption

Run time error 5

invalid procedure call or arg
0
Steven HarrisPresidentCommented:
I am unable to replicate that error.

AppActivate Application.Caption is a common line used to set the focus to the Excel window.  If you are encountering an error, try adding a timer to allow the Excel worksheet to fully load before being called.
0
ProfessorJimJamCommented:
Ok thanks
0
It's more than this solution.Get answers and train to solve all your tech problems - anytime, anywhere.Try it for free Edge Out The Competitionfor your dream job with proven skills and certifications.Get started today Stand Outas the employee with proven skills.Start learning today for free Move Your Career Forwardwith certification training in the latest technologies.Start your trial today
Microsoft Excel

From novice to tech pro — start learning today.