Skip to content
컴퓨터잡담
2011.09.25 23:31

ExCEL VBA) 중복된 데이터 추출하기

조회 수 20196 추천 수 0 댓글 0
?

단축키

Prev이전 문서

Next다음 문서

크게 작게 위로 아래로 댓글로 가기 인쇄
?

단축키

Prev이전 문서

Next다음 문서

크게 작게 위로 아래로 댓글로 가기 인쇄

ExCEL VBA) 중복된 데이터 추출하기

 

Sub ExtractOneItem()
 Dim rngAll As Range, rngCell As Range
 Dim rngOut As Range
 Dim X As New Collection
 Dim varItem
 Dim r As Integer
   
    Set rngAll = Sheets("지정시트").Columns(3).SpecialCells(xlTextValues)
    Set rngOut = ActiveCell
   
    On Error Resume Next
     
   For Each rngCell In rngAll
        X.Add rngCell.Value, CStr(rngCell.Value)
    Next rngCell
   
    For Each varItem In X
        rngOut.Offset(r, 0) = varItem
       r = r + 1
    Next varItem
End Sub

 

로그인 후 댓글쓰기가 가능합니다.

?

  1. 25
    Sep 2011
    23:46

    ExCEL VBA) 함수만들기

    Category컴퓨터잡담 Views13962
    Read More
  2. 25
    Sep 2011
    23:31

    ExCEL VBA) 중복된 데이터 추출하기

    Category컴퓨터잡담 Views20196
    Read More
  3. 25
    Sep 2011
    21:34

    ExCEL VBA) 파일을 열지않고 값 읽어오기

    Category컴퓨터잡담 Views20215
    Read More
  4. 25
    Sep 2011
    00:48

    EXCEL) 매크로 공부하기

    Category컴퓨터잡담 Views12280
    Read More
  5. 04
    Sep 2010
    09:38

    Excel에서 틀 고정 방법

    Category컴퓨터잡담 Views18628
    Read More
  6. 12
    Feb 2010
    09:14

    excel 2007에서 공동 작업하기

    Category컴퓨터잡담 Views24172
    Read More
Board Pagination Prev 1 2 Next
/ 2

http://urin79.com

우린친구블로그

sketchbook5, 스케치북5

sketchbook5, 스케치북5

나눔글꼴 설치 안내


이 PC에는 나눔글꼴이 설치되어 있지 않습니다.

이 사이트를 나눔글꼴로 보기 위해서는
나눔글꼴을 설치해야 합니다.

설치 취소