[뛰어나다] 중복 값을 제거하지만 나머지 행 값은 Excel에서 유지

이 작은 매크로를 시도해보세요.

Sub luxation()
    Dim N As Long
        N = Cells(Rows.Count, 1).End(xlUp).Row
            For i = N To 2 Step -1
                    If Cells(i, 1) = Cells(i - 1, 1) Then
                                Cells(i, 1) = ""
                                        End If
                                            Next i
                                            End Sub
                                            

-------------------

쉬운 비 VBA 방법이 있습니다.

• 1 단계

데이터 의 두 번째 행 =A3=A2에서 D3시작하는 추가 열에 수식 을 추가 합니다 (아래 그림 참조).

• 2 단계

헤더 ( A1:D1아래 그림의 범위) 를 선택 하고 자동 필터를 적용합니다 (DATA-> FILTER로 이동).

• 3 단계

D기준으로 열 필터링=TRUE

• 4 단계

열에서 값 선택 A

• 5 단계

선택한 범위 누르기 Del

• 결과

자동 필터 및 임시 열 제거 D

출처
https://stackoverflow.com/questions/22049895