인접 셀의 내용을 기반으로 Excel 셀 서식 지정

Question

인접한 셀의 내용을 기반으로 지정된 Excel 셀의 서식을 지정하기위한 VBA 코드를 찾고 있습니다.

는 예를 들어, 나는 B3 셀은 문자 "R"및 셀 D3는 문자 "M"을 포함을 포함 경우 노란색 C3 셀에 색을하고 싶습니다. 이 논리를 워크 시트의 전체 영역에 적용하고 싶습니다.

도와 주시겠습니까?

미리 감사드립니다.

자코모

Answer 1

다음은 매우 기본적인 코드 레이아웃입니다. 그러면 텍스트가 빨간색으로 표시됩니다. 노란색으로 색칠하는 법을 찾을 수 있습니다!

Option Explicit 
Private Sub do_it() 
Dim c As Range 
For Each c In Range(Range("a1"), Range("d" & Cells.Rows.Count).End(xlUp)) 
    If c.Column = 2 And c.Value = "R" And c.Offset(0, 2).Value = "M" Then 
     c.Offset(0, -1).Select 
     With c.Font 
      .Color = RGB(255, 0, 0) 
     End With 
    End If 
Next 
End Sub