Excel에서 다른 모든 행을 빠르게 삭제하는 방법은 무엇입니까?

Excel에서 다른 모든 행이나 열을 빠르게 삭제하려면, 가장 중요한 점은 먼저 다른 모든 행이나 열을 어떻게 빠르게 선택할 수 있는지입니다. 그런 다음 그들에 대해 삭제 작업을 적용해야 합니다. 이 문서에서는 먼저 다른 모든 행이나 열을 선택하고 이를 빠르게 삭제하는 몇 가지 유용한 방법을 보여드리겠습니다.

필터 명령어를 사용하여 Excel에서 다른 모든 행 삭제하기

VBA 코드를 사용하여 Excel에서 다른 모든 행 삭제하기

Kutools for Excel을 사용하여 Excel에서 다른 모든 행 또는 열 삭제하기

필터 명령어를 사용하여 Excel에서 다른 모든 행 삭제하기

Microsoft Excel의 필터 명령어는 다른 모든 행을 신속하게 필터링한 후 한 번에 삭제하는 데 도움이 될 수 있습니다. 아래 단계를 따라주세요:

1. 원본 데이터 옆의 빈 열에 0,1,0,1…,0,1을 입력합니다. 이 경우, 우리는 보조 열 C에 숫자를 입력합니다. 다음 스크린샷을 참조하세요:

2. 열 C를 선택하고 데이터 탭 아래의 필터 버튼을 클릭합니다. 그런 다음 C1 옆의 화살표 버튼을 클릭하고 '모두 선택' 옵션 아래의 0만 체크하세요. 스크린샷을 참조하세요:

3. 그러면 1이 있는 모든 행이 숨겨집니다. 0이 있는 표시된 행을 선택하고 홈 > 삭제 > 시트 행 삭제를 클릭하여 이러한 행을 삭제합니다. 그러면 다른 모든 행이 삭제되며, 필터 버튼을 다시 클릭해야 합니다. 스크린샷을 참조하세요:

4. 마지막으로 필요에 따라 보조 열 C를 삭제할 수 있습니다.

VBA 코드를 사용하여 Excel에서 다른 모든 행 삭제하기

사실, VBA 매크로도 이 문제를 해결하기 위한 좋은 선택입니다.

1. Excel에서 Alt + F11 키를 누르면 Microsoft Visual Basic for Applications 창이 열립니다.

2. 삽입 > 모듈을 클릭하고 모듈 창에 다음 매크로를 붙여넣습니다.

VBA 코드: 선택 영역에서 다른 모든 행 삭제하기:

Sub DeleteEveryOtherRow()
'Updateby Extendoffice
Dim rng As Range
Dim InputRng As Range
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)
Application.ScreenUpdating = False
For i = InputRng.Rows.Count To 1 Step -2
    Set rng = InputRng.Cells(i, 1)
    rng.EntireRow.Delete
Next
Application.ScreenUpdating = True
End Sub

3. F5 키를 눌러 이 매크로를 실행합니다. 그러면 범위를 선택하기 위한 대화상자가 나타납니다. 스크린샷을 참조하세요:

4. 확인을 클릭하면 선택된 범위에서 두 번째 행부터 다른 모든 행이 즉시 삭제됩니다. 스크린샷을 참조하세요:

Kutools for Excel을 사용하여 Excel에서 다른 모든 행 또는 열 삭제하기

Microsoft Excel 초보자라면 VBA 매크로를 사용하는 것이 조금 복잡할 수 있습니다. Kutools for Excel 의 간격 행 및 열 선택 유틸리티는 다른 모든 행을 빠르게 삭제하는 데 도움을 줍니다.

Kutools for Excel 설치 후에는 다음과 같이 하세요:

1. 매번 다른 모든 행을 삭제하려는 범위를 선택하고 Kutools > 선택 > 간격 행 및 열 선택...을 클릭하여 이 유틸리티를 적용합니다.

2. 간격 행 및 열 선택 대화 상자에서 다음 스크린샷과 같이 설정을 지정하고 확인 버튼을 클릭하여 다른 모든 행을 먼저 선택합니다.

3. 그러면 선택 영역에서 다른 모든 행이 선택되고 강조 표시됩니다. 스크린샷을 참조하세요:

4. 그런 다음 홈 > 삭제 > 시트 행 삭제를 클릭하여 선택된 모든 행을 빠르게 삭제할 수 있습니다. 스크린샷을 참조하세요:

이 기능을 사용하면 필요에 따라 매 n번째 행이나 열도 삭제할 수 있습니다.

지금 바로 Kutools for Excel을 다운로드하고 무료로 사용해 보세요!