< 2FeRed's Conundrum of Life :: [엑셀] 엑셀 특정 열 삭제




엑셀에서 많은 데이터를 처리할 경우

특정 열만 뽑아서 사용하거나 특정 열만 삭제할 경우가 있다.

데이터 크기가 작다면 문제가 없지만 데이터가 많을 경우 대략 난감한 상황이 발생한다.

아래의 코드를 이용하면 편하게 해결할 수 있을 것이다.

엑셀 코드 사용방법

1) ALT + F8을 누른다.

2) Microsoft Visual Basic 창이 뜨면

메뉴에서 삽입 → 모듈 을 클릭한다.

3) 아래의 코드예시를 참조하여 코드를 생성후 붙여넣는다. (개인별로 행, 열은 알아서 수정)

사실은 별 내용이 없는 코드이지만...

설명을 하자면 Range로 묶어준 다음에 Union을 사용하여 계속 묶어나가는 과정이다.

범위는 행 전체, 열 전체를 택할 수도 있으며 특정 셀영역을 선택할 수 있다.

예시

1) 특정행 선택 
6:6 (6 행선택)
6:9 (6~9행 선택)

2) 특정 열 선택
A:A (A 열 선택)
A:C (A~C 열 선택)

3) 특정 셀영역
A3:F4 (A3 ~ F4까지의 사각 영역선택)


Visual Basic 코드

Sub Optimizing()
' Optimizing 이 매크로의 이름이 된다.
' 간단하게 Range로 행이나 열을 묶은다음에 한꺼번에 지우는 방법이다.
    Dim AAA As Range
    Set AAA = Range("A39:F47,A85:F93")
    Set AAA = Union(AAA, Range("A729:F737,A775:F783"))
    AAA.EntireRow.Delete
End Sub

여기서는 AAA.EntireRow.Delete를 사용했는데

열을 삭제할 경우는 EntireColumn.Delete로 변경하면 된다.



아름다운 인터넷 문화를 위해 댓글을 남겨주세요. -0-;
AND