이 페이지에서
구문
HideToolbar [전체화면]
인수구분
형식 설명
전체화면
선택
Boolean
True일 경우 툴바를 숨김과 동시에 엑셀이 전체화면으로 변경됩니다. 기본값은 False 입니다.
HideToolbar 명령문에만 사용합니다.
마스터 코드
복사한 코드는 VBA 편집기(Alt + F11) 새 모듈에 붙여넣어 사용하세요Sub HideToolbar(Optional FullScreen As Boolean = False)
With Application
.ExecuteExcel4Macro "show.toolbar(""Ribbon"",False)"
.DisplayFullScreen = FullScreen
End With
End Sub
Sub ShowToolbar()
With Application
If .DisplayFullScreen = True Then
.ScreenUpdating = False
.DisplayFullScreen = False
.ExecuteExcel4Macro "show.toolbar(""Ribbon"",True)"
.WindowState = xlMaximized
.ScreenUpdating = True
Else
.ExecuteExcel4Macro "show.toolbar(""Ribbon"",True)"
End If
End With
End Sub
활용 예제
파일 실행 시 툴바를 숨기는 방법
Private Sub Workbook_Open()
HideToolbar
End Sub
다른 파일에서 현재 파일로 활성화될 때 툴바를 숨기는 방법
Private Sub Workbook_WindowActivate(ByVal Wn As Window)
HideToolbar
End Sub
안내사항
명령문은 VBA 편집기의 '삽입 → 모듈'로 새 모듈을 추가한 뒤 그 안에 붙여넣어 사용합니다.
파일을 열거나 활성화할 때마다 툴바를 숨기려면 현재_통합_문서의 Workbook_Open·Workbook_WindowActivate 이벤트와 함께 사용합니다.
혹시 리본메뉴 중에 리본탭(파일. 홈. 삽입...)만 남겨두고 그 아래 리본메뉴는 숨김으로 처리하는 방법은 있을까요?
단축키 Ctrl + F1 을 눌러보세요.
보호된 파일에 붙여넣기하시려면, 붙여넣기 하기 전 파일 보호를 해제 한 후 붙여넣도록 코드를 수정해보세요. :)
감사합니다.