활성 워크북을 제외한 모든 워크북을 빠르게 닫는 방법은 무엇입니까?

컴퓨터에서 여러 워크북이 열려 있고, 활성 워크북만 남기고 나머지를 모두 닫으려고 한다면, 하나씩 닫는 것 외에 이 작업을 처리할 수 있는 빠른 방법이 있을까요? 이 기사에서는 한 번의 클릭으로 이를 해결할 수 있는 몇 가지 쉬운 방법에 대해 설명하겠습니다.

VBA 코드를 사용하여 활성 워크북을 제외한 모든 워크북 닫기

Office Tab을 사용하여 활성 워크북을 제외한 모든 워크북 닫기

VBA 코드를 사용하여 활성 워크북을 제외한 모든 워크북 닫기

다음 VBA 코드를 사용하면 활성 워크북을 제외한 모든 열린 워크북을 빠르게 닫을 수 있습니다. 아래 단계를 따라 주세요:

1. 열어두고 싶은 워크북을 활성화하세요.

2. ALT + F11 키를 눌러 Microsoft Visual Basic for Applications 창을 엽니다.

3. 삽입 > 모듈을 클릭하고, 모듈 창에 다음 코드를 붙여넣습니다.

VBA 코드: 활성 워크북을 제외한 모든 워크북 닫기

Private Sub CloseOtherWorkbook()
'Updateby Extendoffice
Dim xWB As Workbook
Application.ScreenUpdating = False
For Each xWB In Application.Workbooks
    If Not (xWB Is Application.ActiveWorkbook) Then
        xWB.Close
    End If
Next
Application.ScreenUpdating = True
End Sub

4. 그런 다음 F5 키를 눌러 이 코드를 실행합니다. 그러면 다른 모든 워크북이 즉시 닫히고 활성 워크북만 남게 됩니다.

Office Tab을 사용하여 활성 워크북을 제외한 모든 워크북 닫기

새로운 제품인 Office Tab에 관심이 있다면, 이 도구는 여러 문서/파일을 하나의 탭 창에서 열 수 있도록 도와줍니다. 이를 통해 활성 워크북을 제외한 모든 워크북을 한 번의 클릭으로 닫을 수 있습니다. Office Tab에 대해 자세히 알아보고 다운로드할 수 있습니다.

Office Tab을 설치한 후, 열려 있는 모든 워크북이 하나의 탭 창에 표시되는 것을 확인할 수 있습니다. 스크린샷 참고:

그런 다음 열어두고자 하는 워크북 이름을 클릭하고 이름 탭을 마우스 오른쪽 버튼으로 클릭한 후, 컨텍스트 메뉴에서 '다른 항목 닫기'를 선택합니다. 스크린샷 참고:

그러면 활성 워크북만 열려 있는 것을 확인할 수 있습니다.

관련 기사:

Excel에서 모든 워크북을 빠르게 닫는 방법은 무엇입니까?