프로젝트 및 실습/VBA

[VBA] 행, 열 숨기기

jooona 2022. 8. 8. 19:00
반응형

VBA에서는 원하는 행 또는 열을 숨길 수 있는 기능을 지원합니다.

 

사용법은 예시와 함께 알아보겠습니다.

 

 우선 다음과 같이 Sheet를 준비해보았습니다.

 

 

여기서 A-B열과 1-2행을 완전히 숨기려면 다음과 같이 수행하면 됩니다.

 

Sub Hidden_Example()
    
    Dim sht As Worksheet
    Set sht = Sheet7
    
    sht.Range("A1:B1").EntireColumn.Hidden = True ' 원하는 열 숨김
    sht.Range("A1:A2").EntireRow.Hidden = True ' 원하는 행 숨김
    
End Sub

 

 Sheet의 이름인 sht 변수에 대해서는 본인의 예제에 맞게 설정하시면 됩니다.

 

Range를 원하는 대로 설정한 뒤, EntireColumn 속성에 대해 Hidden을 True로 설정하면 해당 Range가 포함되는 모든 열이, EntireRow 속성에 대해 Hidden을 True로 설정하면 해당 Range가 포함되는 모든 행이 숨겨집니다.

 

위의 예제 코드의 경우 열에 대해서는 A열과 B열, 행에 대해서는 1행과 2행에 대해 Range를 적용했기 때문에 다음과 같은 실행결과를 얻을 수 있습니다.

 

 

A열과 B열, 1행과 2행이 완전히 숨겨진 것을 확인할 수 있습니다.

 

반대로 다시 나타나게 할 때에는 각 속성들을 False로 만들어주기만 하면 됩니다.

 

Sub Hidden_Example()
    
    Dim sht As Worksheet
    Set sht = Sheet7
    
    sht.Range("A1:B1").EntireColumn.Hidden = False
    sht.Range("A1:A2").EntireRow.Hidden = False
    
End Sub

 

 

사실 이 방법은 행 또는 열을 완전히 숨기는 것이 아닌 너비 또는 높이를 0으로 만들어 숨기는 것이기 때문에 숨겨진 행 또는 열의 가장자리에 마우스를 대서 셀 크기를 조절함으로써 다시 나타나도록 할 수도 있습니다.  

 

 

반응형

'프로젝트 및 실습 > VBA' 카테고리의 다른 글

[VBA] SGN Function  (0) 2022.08.22
[VBA] Http Request 보내기  (0) 2022.08.11
[VBA] Join Function  (0) 2022.08.08
[VBA] ParamArray  (0) 2022.08.05
[VBA] IIf Function  (0) 2022.08.04