이 짧은 자습서에서는 필터링 또는 VBA 코드를 사용하여 Excel에서 다른 모든 행을 삭제하는 방법을 설명합니다. 또한 3번째, 4번째 또는 다른 N번째 행마다 제거하는 방법도 배웁니다.

Excel 워크시트에서 대체 행을 삭제해야 하는 경우가 많습니다. 예를 들어 짝수 주(행 2, 4, 6, 8 등) 동안 데이터를 유지하고 모든 홀수 주(행 3, 5, 7 등)를 다른 시트로 이동할 수 있습니다.

일반적으로 Excel에서 다른 모든 행을 삭제하면 대체 행을 선택하는 것으로 귀결됩니다. 행이 선택되면 삭제 버튼을 한 번만 누르면 됩니다. 이 기사에서는 Excel에서 다른 모든 행 또는 모든 N번째 행을 빠르게 선택하고 삭제하는 몇 가지 기술을 배웁니다.

필터링을 통해 Excel에서 다른 모든 행을 삭제하는 방법

본질적으로 Excel에서 다른 모든 행을 지우는 일반적인 방법은 다음과 같습니다. 먼저 대체 행을 필터링한 다음 선택하고 한 번에 모두 삭제합니다. 자세한 단계는 다음과 같습니다.

1. 원본 데이터 옆의 빈 열에 일련의 0과 1을 입력합니다. 첫 번째 셀에 0을 입력하고 두 번째 셀에 1을 입력한 다음 처음 두 셀을 복사하고 데이터가 있는 마지막 셀까지 열 아래로 붙여넣어 빠르게 이 작업을 수행할 수 있습니다.

   또는 다음 수식을 사용할 수 있습니다.

   =MOD(ROW(),2)

   수식의 논리는 매우 간단합니다. ROW 함수는 현재 행 번호를 반환하고 MOD 함수는2로 나누고 정수로 반올림한 나머지를 반환합니다.

   결과적으로 모든 짝수 행에는 0이 있고(나머지 없이 균등하게 2로 나누기 때문에) 모든 홀수 행에는 1이 있습니다.

   

2. 짝수 또는 홀수 행을 삭제할지 여부에 따라 1 또는 0을 필터링합니다.

   완료하려면 도우미 열에서 아무 셀이나 선택하고 데이터 탭 > 정렬 및 필터 그룹으로 이동한 다음 필터 를 클릭합니다. 단추. 드롭다운 필터 화살표가 모든 머리글 셀에 나타납니다. 도우미 열에서 화살표 버튼을 클릭하고 상자 중 하나를 선택합니다.

   • 짝수 행을 삭제하려면 0
   • 홀수 행을 삭제하려면 1

   이 예에서는 값이 "0"인 행을 제거하므로 필터링합니다.

   

3. 이제 모든 "1" 행이 숨겨졌으므로 표시되는 모든 "0" 행을 선택하고 선택 항목을 마우스 오른쪽 버튼으로 클릭한 다음 행 삭제 를 클릭합니다.

   

4. 위 단계에서 빈 테이블이 남았습니다. , 그러나 걱정하지 마십시오. "1" 행이 여전히 있습니다. 다시 표시하려면 필터 버튼을 다시 클릭하여 자동 필터를 제거하면 됩니다.

   

5. 열 C의 수식은 나머지 행에 대해 다시 계산합니다. 하지만 더 이상 필요하지 않습니다. 이제 도우미 열을 안전하게 삭제할 수 있습니다.

   

   또한보십시오: 비정기 현금 흐름에 대한 IRR을 계산하는 Excel XIRR 함수

결과적으로 워크시트에는 짝수 주만 남고 홀수 주는 사라졌습니다!

팁. 매번 옮기고 싶다면다른 행을 모두 삭제하지 않고 다른 곳에 복사하려면 먼저 필터링된 행을 복사하여 새 위치에 붙여넣은 다음 필터링된 행을 삭제합니다.

VBA를 사용하여 Excel에서 대체 행을 삭제하는 방법

Excel 워크시트에서 다른 모든 행을 삭제하는 것과 같은 사소한 작업에 시간을 낭비하고 싶지 않다면 다음 VBA 매크로를 사용하여 프로세스를 자동화할 수 있습니다.

Sub Delete_Alternate_Rows_Excel() Dim SourceRange As Range Set SourceRange = Application.Selection Set SourceRange = Application.InputBox( "범위:" , "범위 선택" , SourceRange.Address, Type :=8) If SourceRange.Rows.Count >= 2 Then Dim FirstCell As Range Dim RowIndex As Integer Application.ScreenUpdating = False For RowIndex = SourceRange.Rows.Count - (SourceRange.Rows.Count Mod 2) To 1 Step -2 Set FirstCell = SourceRange.Cells(RowIndex, 1) FirstCell.EntireRow.Delete 다음 Application.ScreenUpdating = True End If End Sub

매크로를 사용하여 Excel에서 다른 모든 행을 삭제하는 방법

I Visual Basic Editor를 통해 일반적인 방법으로 워크시트에 매크로를 삽입합니다.

1. Alt + F11을 눌러 Visual Basic for Applications 창을 엽니다.
2. 상단 메뉴 표시줄에서 삽입 > 모듈 을 클릭하고 위의 매크로를 모듈 에 붙여넣습니다.
3. F5 키를 눌러 매크로를 실행합니다.
4. 대화 상자가 나타나고 범위를 선택하라는 메시지가 표시됩니다. 테이블을 선택하고 클릭확인:

   

   또한보십시오: 공식을 Google 스프레드시트에서 계산된 값으로 전환

완료! 선택한 범위의 다른 모든 행이 삭제됩니다.

Excel에서 N번째 행마다 삭제하는 방법

이 작업에서는 필터링을 확장합니다. 다른 모든 행을 제거하는 데 사용한 기술입니다. 차이점은 필터링의 기반이 되는 수식에 있습니다.

MOD(ROW()- m, n)

여기서:

• m 는 데이터에서 1을 뺀 첫 번째 셀의 행 번호입니다.
• n 는 삭제할 N번째 행입니다.

데이터가 2행에서 시작하고 3행마다 삭제한다고 가정해 보겠습니다. 따라서 공식에서 n 은 3이고 m 는 1입니다(행 2 빼기 1):

=MOD(ROW() - 1, 3)

데이터가 행 3이면 m 는 2(행 3 빼기 1)와 같습니다. 이 수정은 숫자 1부터 시작하여 행 번호를 순차적으로 지정하는 데 필요합니다.

공식이 수행하는 작업은 상대 행 번호를 3으로 나누고 나눈 나머지를 반환하는 것입니다. 우리의 경우 세 번째 행마다 나머지(3,6,9 등) 없이 3으로 나누기 때문에 세 번째 행마다 0이 생성됩니다.

그리고 이제 이미 익숙한 단계를 수행하여 "0" 행을 필터링합니다.

1. 표에서 임의의 셀을 선택하고 데이터
에서 필터 버튼을 클릭합니다.
2. "0" 값만 표시하도록 도우미 열을 필터링합니다.
3. 보이는 "0" 행을 모두 선택하고 마우스 오른쪽 버튼을 클릭한 다음 컨텍스트 메뉴에서 행 삭제 를 선택합니다.
4. 필터를 제거하고도우미 열을 삭제합니다.

유사한 방식으로 Excel에서 4번째, 5번째 또는 다른 N번째 행마다 삭제할 ​​수 있습니다.

팁. 관련 없는 데이터가 있는 행을 제거해야 하는 경우 다음 튜토리얼이 도움이 될 것입니다: 셀 값을 기준으로 행을 삭제하는 방법.

읽어 주셔서 감사하고 다음 주에 블로그에서 다시 뵙기를 바랍니다. .