| |
* 답변하시는 분들께 도움이 되도록 자신의 환경을 아래 항목 옆에 기재해 주세요.
1. 엑셀 버전(95,97,2000,2002):
2. 윈도우즈의 버전(win95,win98,winME,winNT,win2000,winXP):
3. CPU (486,PentiumI/II/III/IV...):
4. RAM (32,64,128,256,512MB,1G...):
* 아래줄에 질문을 작성하세요 >>
sheet1에 모집단 키워드가 탭으로 나열되어 있고
sheet2 a열에 비교해야할 키워드가 있을때...
sheet2 a열에 있는 키워드들 중에서 sheet1 모집단 키워드에
없는 키워드가 있다면 sheet2 b열에 노출하고자 합니다.
이때 모집단 키워드는 무작위로 나열되어 있습니다.
이것을 어떻게 해결해야 할까요? 예시는 첨부합니다.
여러가지 match 함수나 vlookup 함수로 도전해 보았는데
잘 모르겠습니다. 고수님들 꼭 좀 도와주세요...급한거라..^^;;;
감사합니다
==============[창님 글에 대한 답변입니다]==============
댓글에 제한이 있어서 다시 답변을 드립니다.
결국 함수는 안될거 같아서 간단한 코드를 썼습니다.
함 참고해보세요
Sub test()
Dim rngTarget As Range
Dim AstrTemp() As String
Dim strTemp As String
Dim i As Integer
Dim j As Integer
Dim c As Range
Set rngTarget = Worksheets("sheet1").UsedRange
With Worksheets("sheet2")
For i = 2 To 6
AstrTemp() = Split(.Range("a" & i).Value, ",")
For j = 0 To UBound(AstrTemp())
Set c = rngTarget.Find(AstrTemp(j), LookIn:=xlValues, lookat:=xlWhole)
If c Is Nothing Then
strTemp = strTemp & "," & AstrTemp(j)
End If
Next j
.Range("b" & i).Value = Replace(strTemp, ",", "", 1, 1)
strTemp = ""
Next i
Set c = Nothing
End With
End Sub
|
|
엑셀에 대한 질문과
답변을 올려주세요. 단, 취지에 맞지 않는 글은 운영자가 삭제합니다.
