Set Excel Environment

Here are a set of commands that you can use to set excel environment.
Sub TestRun() Call SetExcelEnvironment(True) End Sub Sub SetExcelEnvironment(blnShow As Boolean) With ActiveWindow .DisplayHeadings = blnShow 'Row Col Heading .DisplayWorkbookTabs = blnShow 'Sheet Tabs .DisplayHorizontalScrollBar = blnShow 'Horizontal Scrollbar .DisplayVerticalScrollBar = blnShow 'Vertical Scrollbar End With Application.DisplayFormulaBar = blnShow 'Formula Bar If Application.Version >= 12 Then Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon""," & blnShow & ")" 'Excel 2007 Ribbon End If End Sub
»
- Vishesh's blog
- Login or register to post comments
- 8537 reads
Recent comments
6 years 7 weeks ago
6 years 45 weeks ago
7 years 5 weeks ago
7 years 8 weeks ago
7 years 9 weeks ago
7 years 14 weeks ago
7 years 22 weeks ago
7 years 23 weeks ago
7 years 23 weeks ago
7 years 23 weeks ago