업무 자동화/VBA VB.Net Code
Cells 값 비교 하기
ToolBOX01
2022. 12. 16. 13:21
Range ("B4:B15")의 값들과 Range ("D6:D13")의 값을 비교하여 동일하면 "E"에 "yes"로 표시 합니다.
대, 소 문자를 구분 합니다. 비어 있는 CELL을 표시 하기 위해 "*"를 입력 하였습니다.
VBA 코드
Sub CELL값비교()
Dim i, j As Long
Dim rngCellB As Range: Set rngCellB = Range("B4", Cells(Rows.Count, "B").End(xlUp))
Dim rngCellD As Range: Set rngCellD = Range("D6", Cells(Rows.Count, "D").End(xlUp))
For i = 0 To rngCellB.Count - 1
For j = 0 To rngCellD.Count - 1
If Cells(i + 4, "B").Value = Cells(j + 6, "D").Value Then
Cells(j + 6, "E") = "YES"
End If
Next j
Next i
End Sub
ㅁㅁ