이 기사에서는 Microsoft Excel에서 VBA를 통해 빈 열을 삭제하는 방법에 대해 알아 봅니다. 완전히 비어있는 열을 삭제합니다. 전체 열에 데이터가 없으면 해당 데이터를 의미합니다 .

예를 들어 이해해 봅시다 :

A1 : I21 범위의 데이터가 있습니다. A 열에는 이름, B 열은 공백, C 열에는 거리 주소, D 열 City, E 열은 공백, F 열에는 지역, G 열은 공백, H 열에는 국가가 포함됩니다. 이름, 열 I에는 전화 번호가 있습니다.

image 1

데이터에서 빈 열을 삭제하고 싶습니다. 아래 단계와 코드를 따르십시오. VBE 페이지를 열고 Alt + F11 키를 누르십시오. 모듈을 삽입하여 코드를 작성하십시오. * 아래에 언급 된 코드를 작성하십시오.

Sub Delete_Columns()

Dim C As Integer

C = ActiveSheet.Cells.SpecialCells(xlLastCell).Column

Do Until C = 0

If WorksheetFunction.CountA(Columns(C)) = 0 Then

Columns(C).Delete

End If

C = C - 1

Loop

End Sub

코드 설명 :

먼저 모든 변수를 정의했습니다. 그런 다음 빈 열의 범위는 “Do until loop”를 사용하여 빈 열을 삭제했습니다.

이제 빈 열과 삭제 명령을 정의했습니다.

image 2

코드를 실행하려면 키보드에서 F5 키를 누르십시오. * 모든 빈 열은 삭제됩니다.

image 3

이런 식으로 Microsoft Excel에서 VBA를 통해 빈 열을 삭제할 수 있습니다.

image 48

_ 블로그가 마음에 들면 Facebook에서 친구들과 공유하세요. Twitter와 Facebook에서도 팔로우 할 수 있습니다 ._

_ 우리는 여러분의 의견을 듣고 싶습니다. 우리가 작업을 개선, 보완 또는 혁신하고 더 나은 서비스를 제공 할 수있는 방법을 알려주십시오. [email protected]_로 문의 해주세요