Results 1 to 3 of 3
Thread: Excel VBA - SheetBar Headings
Hybrid View
-
3rd December 2010 11:24 #1Registered User
Join Date: Oct:2008
Location:
Posts: 95
Excel VBA - SheetBar Headings
,
, Excel. , . (Sheets). SheetsBar , . Sheet. :
!Code:Public Sub hide_vsichko() ActiveWindow.DisplayWorkbookTabs = False ActiveWindow.DisplayHeadings = False End Sub Public Sub show_vsichko() ActiveWindow.DisplayWorkbookTabs = True ActiveWindow.DisplayHeadings = True End Sub Private Sub Workbook_Open() hide_vsichko End Sub
-
3rd December 2010 11:50 #2Registered User
Join Date: Aug:2009
Location:
Posts: 265
, .
(worksheet), , , , .
-
3rd December 2010 16:33 #3Registered User
Join Date: Oct:2008
Location:
Posts: 95
Avis, !
, , :
!Code:Public Sub hide_vsichko() ActiveWindow.DisplayWorkbookTabs = False ActiveWindow.DisplayHeadings = False End Sub Public Sub show_vsichko() ActiveWindow.DisplayWorkbookTabs = True ActiveWindow.DisplayHeadings = True End Sub Public Sub hiden() Dim wsSheet As Worksheet Application.ScreenUpdating = False For Each wsSheet In Worksheets wsSheet.Select hide_vsichko Next wsSheet Application.ScreenUpdating = True Worksheets(Array(1)).Select End Sub Private Sub Workbook_Open() hiden End Sub




Reply With Quote
Lenovo ThinkPad 15 IdeaPad 15
5th May 2023, 22:16 in