이동 중에 모든 유사한 행 번호를 삭제하는 방법을 원한다면이 문서가 적합합니다.

이 기사에서는 매크로를 통해 여러 워크 시트에서 동일한 행을 제거하는 방법을 알아 봅니다.

===

질문) : VBA 코드를 사용하여 여러 워크 시트에서 동일한 행을 삭제하고 싶습니다. 내가 원하는 것은 현재 파일에있는 시트 수에 관계없이 통합 문서의 모든 행을 삭제하는 코드입니다. 5 개 시트 모두에서 선택한 행 번호를 삭제하고 싶습니다.

우선 같은 위치에있는 모든 워크 시트에 비슷한 데이터를 입력합시다

image 1

아래 단계를 따라야합니다.

개발자 탭을 클릭하십시오. 코드 그룹에서 Visual Basic을 선택하십시오

image 2

표준 모듈에 다음 코드를 입력하십시오.-

하위 DeleteRows ()

Dim shtArr, i As Long, xx As Long

shtArr = Array ( “Sheet1”, “Sheet2”, “Sheet3”, “Sheet4”, “Sheet5”)

xx = 선택. 행

For i = LBound (shtArr) To UBound (shtArr)

Sheets (shtArr (i)). Rows (xx) .EntireRow.Delete

다음 i

End Sub

===

image 3

  • 이제 커서를 A1 셀과 Sheet1에 놓습니다.

매크로를 실행하려면 Alt + F8 *을 누르십시오. 선택한 행 번호가 모든 시트에서 삭제됩니다.

  • 다음 스냅 샷은 시트 1 및 시트 2 데이터를 예로 보여줍니다. 이 연습을 실행하면 각 시트에서 유사한 솔루션을 찾을 수 있습니다.