列 'B' の対応するセルの値が値「Y」。
列「B」の対応するセルが値「N」を保持している場合、列「A」に「検証」、「検証」、「評価」などの単語を含めることはできません。したがって、それらの不一致がある場合は、それらを強調する必要があります。
列「A」: Enter キーを押して、これとこれを確認します...
列「B」: Y
これは簡単な例です。ただし、列 B を空白にできない場合は、2 番目の数式を省略できます。これが合っているかどうかを確認してください...
編集:
VBA
リクエストされた例を次に示します。コードを現在のシートに保存する必要があります (例: Sheet1 )...
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
Dim str As String
Dim lCol As Long
Dim oCell As Object
Dim oCellFormat As Object
lCol = Target.Column
If lCol = 1 Or lCol = 2 Then
Set oCell = Cells(Target.Row, 1)
Else
GoTo mExit
End If
str = UCase(oCell.Value)
Set oCellFormat = Cells(oCell.Row, 1)
If (str = "VERIFY" Or str = "VALIDATE" Or str = "EVALUATE") Then
If UCase(Cells(oCell.Row, 2).Value) = "N" Then
oCellFormat.Interior.ColorIndex = 3 'red
ElseIf UCase(Cells(oCell.Row, 2).Value) = "Y" Then
oCellFormat.Interior.ColorIndex = 4 'green
Else
oCellFormat.Interior.ColorIndex = 2 'white
End If
Else
oCellFormat.Interior.ColorIndex = 2 'white
End If
GoTo mExit
Exit Sub
mExit:
Set oCell = Nothing 'free resources
Set oCellFormat = Nothing
End Sub