Donna는 회사 전체에서 사용할 문서를 준비합니다. 그녀는 문서를 열었을 때 화면 상단의 리본을 “최소화”하고 닫았을 때 리본을 “열기 전”상태로 되돌리기를 원합니다. 이는 문서의 최대 화면 영역을 제공하기 위해 수행됩니다. Donna는이 작업을 수행하려면 매크로가 필요하다고 생각하지만 작업을 수행하는 데 어떤 명령을 사용해야할지 모르겠습니다.

VBA에서 리본으로 작업하는 데 사용할 수있는 정보가 매우 부족합니다. 실제로 리본을 최소화 할 수있는 유일한 방법은 다음과 같습니다.

ActiveWindow.ToggleRibbon

이 방법은 Ctrl + F1을 누르는 것과 같습니다. 리본을 전환하여 최대화에서 최소화로 변경하거나 그 반대로 변경합니다. 물론 이것은 Donna가 원하는 것이 아닙니다. 그녀는 그것이 최소화되었는지 확인하려고합니다. ToggleRibbon 방법을 사용하면 리본이 최소화되었는지 여부를 파악하는 방법을 “퍼지”할 수 있습니다. 다음 예제 매크로를 고려하십시오.

Dim w As Variant Dim h1 As Long Dim h2 As Long Dim StartedWithRibbon As Boolean

Private Sub Document_Open()

Set w = ActiveWindow     h1 = w.UsableHeight     w.ToggleRibbon     h2 = w.UsableHeight     If h1 < h2 Then         StartedWithRibbon = False     Else         StartedWithRibbon = True         w.ToggleRibbon     End If End Sub
Private Sub Document_Close()

Set w = ActiveWindow     h1 = w.UsableHeight     w.ToggleRibbon     h2 = w.UsableHeight     If h2 < h1 Then         If StartedWithRibbon Then w.ToggleRibbon     Else         If Not StartedWithRibbon Then w.ToggleRibbon     End If End Sub

실제로 여기에는 두 개의 매크로가 있습니다. 하나는 문서를 열 때 자동으로 트리거되고 다른 하나는 닫힐 때 트리거됩니다. 매크로는 활성 창의 높이를 확인하여 h1 변수에 저장합니다. 그런 다음 리본을 토글하고 활성 창 높이를 다시 확인하여 h2에 저장합니다. 두 값을 비교하여 리본이 최소화되었는지 여부를 확인한 다음 그에 따라 조치를 취할 수 있습니다.

_ 참고 : _

이 페이지 (또는 WordTips 사이트의 다른 페이지)에 설명 된 매크로를 사용하는 방법을 알고 싶다면 유용한 정보가 포함 된 특별 페이지를 준비했습니다.

link : / wordribbon-WordTipsMacros [새 브라우저 탭에서 특별 페이지를 열려면 여기를 클릭하세요].

_WordTips_는 비용 효율적인 Microsoft Word 교육을위한 소스입니다.

(Microsoft Word는 세계에서 가장 인기있는 워드 프로세싱 소프트웨어입니다.)이 팁 (8515)은 Microsoft Word 2007, 2010, 2013, 2016, 2019 및 Office 365의 Word에 적용됩니다.