활성 워크시트를 제외한 모든 항목을 숨기는 Excel 매크로

이 매크로를 사용하여 비활성 워크시트를 숨길 수 있습니다. Excel에서는 통합 문서의 모든 시트를 숨길 수 없습니다. 적어도 하나는 표시되어야 합니다. 그러나 활성 시트를 제외한 모든 시트를 숨길 수 있습니다.

매크로 작동 방식

여기에 있는 매크로는 워크시트를 반복하고 각 워크시트 이름을 활성 시트의 이름과 일치시킵니다. 매크로가 반복될 때마다 일치하지 않는 워크시트가 숨겨집니다.

하위 매크로1()
'1단계: 변수 선언
    Dim ws As 워크시트
'2단계: 모든 워크시트 반복 시작
    ThisWorkbook.Worksheets의 각 ws에 대해
'3단계: 각 워크시트 이름 확인
    If ws.Name <> ThisWorkbook.ActiveSheet.Name 다음
'4단계: 시트 숨기기
    ws.Visible = xlSheetHidden
    종료
'5단계: 다음 워크시트로 루프
    다음 ws
엔드 서브

1단계에서는 ws라는 객체를 선언합니다. 이 단계에서는 매크로가 반복되는 각 워크시트에 대한 메모리 컨테이너를 만듭니다.

2단계에서는 루프를 시작하여 Excel에서 이 통합 문서의 모든 워크시트를 평가하도록 지시합니다. ThisWorkbook과 ActiveWorkbook의 차이점을 확인하세요. ThisWorkBook 개체는 코드가 포함된 통합 문서를 참조합니다. ActiveWorkBook 개체는 현재 활성 통합 문서를 참조합니다. 종종 동일한 개체를 반환하지만 코드를 실행하는 통합 문서가 활성 통합 문서가 아닌 경우 다른 개체를 반환합니다. 이 경우 다른 통합 문서에서 시트를 숨기는 위험을 감수하고 싶지 않으므로 ThisWorkBook을 사용합니다.

3단계에서 매크로는 단순히 활성 시트 이름을 현재 반복되고 있는 시트와 비교합니다.

시트 이름이 다른 경우 매크로는 4단계에서 시트를 숨깁니다.

5단계에서 루프백하여 다음 시트를 얻습니다. 모든 시트가 평가된 후 매크로가 종료됩니다.

매크로에서 xlsheetHidden을 사용합니다. 이 속성은 시트를 마우스 오른쪽 버튼으로 클릭하고 숨기기를 선택할 때 일반적으로 얻을 수 있는 기본 숨기기 상태를 적용합니다. 이 기본 숨기기 상태에서 사용자는 아무 탭이나 마우스 오른쪽 버튼으로 클릭하고 모든 숨겨진 시트를 표시하는 숨기기 해제를 선택할 수 있습니다. 그러나 또 다른 숨기기 상태는 기본값보다 더 은밀합니다. xlSheetVeryHidden을 사용하여 시트를 숨기면 사용자가 탭을 마우스 오른쪽 버튼으로 클릭하고 숨기기 해제를 선택하더라도 시트를 전혀 볼 수 없습니다. 이러한 방식으로 숨겨진 시트를 숨김 해제하는 유일한 방법은 VBA를 사용하는 것입니다.