show status bar

[kingcashandcarry]

i can't manage to work this
i want to see the status bar but not the workbook tabs

[Sub HideExcelItems()
ActiveWindow.DisplayWorkbookTabs = False
ActiveWindow.Displaystatusbar = true
End Sub]

 

[YasserKhalil]

Try using Application instead of ActiveWindow

Sub HideExcelItems()
    ActiveWindow.DisplayWorkbookTabs = False
    Application.DisplayStatusBar = True
End Sub

 

[kingcashandcarry]

i had tested it and before neither application.display works

 

[YasserKhalil]

So it is still not working or what !!?

 

[kingcashandcarry]

no when i use command to hide it hides both

the all sub is
Sub HideExcelItems()
Application.DisplayFullScreen = True
Application.DisplayFormulaBar = True
ActiveWindow.DisplayWorkbookTabs = False
ActiveWindow.DisplayHeadings = False
ActiveWindow.DisplayGridlines = True
Application.DisplayStatusBar = True
End Sub

 

[YasserKhalil]

It is hidden as you use "DisplayFullScreen" which display the screen in full state ... I think it is part of the full screen now

 

[kingcashandcarry]

ok i get it i didn't know it

 

[kingcashandcarry]

just for the story and anyone that might consern

[Sub HideExcelItems()
Application.DisplayFullScreen = False
Application.DisplayFormulaBar = True
ActiveWindow.DisplayWorkbookTabs = False
ActiveWindow.DisplayHeadings = False
ActiveWindow.DisplayGridlines = True
Application.DisplayStatusBar = True
Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",False)"
End Sub]