문제의 공식화
빈 셀이 포함된 데이터가 있는 셀 범위가 있습니다.
작업은 정보가 있는 셀만 남기고 빈 셀을 제거하는 것입니다.
방법 1. 거칠고 빠름
- 원래 범위 선택
- 키 누르기 F5, 다음 버튼 강조 (특별한). 열리는 창에서 다음을 선택하십시오. 빈 셀(공백) 클릭 OK.
범위의 모든 빈 셀이 선택됩니다.
- 메뉴에서 선택한 셀을 삭제하는 명령을 제공합니다.- 셀 삭제 (셀 삭제) 상향 이동으로.
방법 2: 배열 수식
단순화하기 위해 다음을 사용하여 작업 범위의 이름을 지정하겠습니다. 이름 관리자 (이름 관리자) 탭 공식 (방식) 또는 Excel 2003 및 이전 버전에서 메뉴 삽입 – 이름 – 할당 (삽입 — 이름 — 정의)
범위 이름을 B3:B10으로 지정 비어 있음, 범위 D3:D10 – 없음 비어 있음. 범위는 완전히 같은 크기여야 하며 서로 상대적인 위치에 위치할 수 있습니다.
이제 두 번째 범위(D3)의 첫 번째 셀을 선택하고 이 무서운 수식을 입력합니다.
=IF(ROW() -ROW(NoEmpty)+1>NOTROWS(YesEmpty)-COUNTBLANK(YesEmpty);"";INDIRECT(ADDRESS(LOWEST((IF(Empty<>"",ROW(Empty);ROW() + ROWS(비어 있음))); LINE()-ROW(비어 있지 않음)+1); COLUMN(비어 있음); 4)))
영어 버전에서는 다음과 같습니다.
=IF(ROW()-ROW(NoEmpty)+1>ROWS(비어 있음)-COUNTBLANK(비어 있음),””,INDIRECT(ADDRESS(SMALL((IF(비어 있음<>“”,ROW(비어 있음),ROW() +ROWS(HaveEmpty))),ROW()-ROW(NoEmpty)+1),COLUMN(HaveEmpty),4)))
또한 배열 수식으로 입력해야 합니다. 엔터 버튼 (평소처럼) 그리고 Ctrl + Shift + Enter. 이제 자동 완성을 사용하여 수식을 복사할 수 있습니다(셀의 오른쪽 하단 모서리에 있는 검은색 십자형 드래그). 그러면 빈 셀이 없는 원래 범위가 표시됩니다.
방법 3. VBA의 사용자 정의 기능
범위에서 빈 셀을 제거하는 절차를 자주 반복해야 하는 경우가 많다면 표준 세트에 빈 셀을 제거하는 자체 기능을 한 번 추가하고 이후의 모든 경우에 사용하는 것이 좋습니다.
이렇게 하려면 Visual Basic Editor(ALT + F11), 새 빈 모듈을 삽입합니다(메뉴 삽입 – 모듈) 이 함수의 텍스트를 복사합니다.
Function NoBlanks(DataRange As Range) As Variant() Dim N As Long Dim N2 As Long Dim Rng As Range Dim MaxCells As Long Dim Result() As Variant Dim R As Long Dim C As Long MaxCells = Application.WorksheetFunction.Max( _ Application.Caller.Cells.Count, DataRange.Cells.Count) DataRange.Cells의 각 Rng에 대해 ReDim 결과(1에서 MaxCells로, 1에서 1로) If Rng.Value <> vbNullString Then N = N + 1 Result(N, 1 ) = Rng.Value End If Next Rng For N2 = N + 1 To MaxCells Result(N2, 1) = vbNullString Next N2 If Application.Caller.Rows.Count = 1 Then NoBlanks = Application.Transpose(Result) Else NoBlanks = Result End If End 함수
파일을 저장하고 Visual Basic Editor에서 Excel로 다시 전환하는 것을 잊지 마십시오. 이 예에서 이 기능을 사용하려면:
- 충분한 범위의 빈 셀을 선택하십시오(예: F3:F10).
- 메뉴로 이동 삽입 – 기능 (삽입 — 기능)또는 버튼을 클릭하십시오 삽입 기능 (삽입 기능) 탭 공식 (방식) 최신 버전의 Excel에서. 카테고리 내 사용자 정의 (사용자 정의) 우리의 기능을 선택 노블랭크스.
- 함수 인수로 void(B3:B10)를 사용하여 소스 범위를 지정하고 키를 누릅니다. Ctrl + Shift + Enter함수를 배열 수식으로 입력합니다.
:
- 간단한 매크로로 한 번에 테이블의 모든 빈 행 삭제
- PLEX 추가 기능을 사용하여 한 번에 워크시트의 모든 빈 행 제거
- 모든 빈 셀을 빠르게 채우기
- 매크로 란 무엇입니까? VBA에서 매크로 코드를 삽입 할 위치