Вы можете использовать следующее:
Select Case True
Case Range("A1") = "white" And Range("B1") < 2: Range("C1")=25
Case Range("A1") = "white" And Range("B1")>=2: Range("C1")=49
Case Range("A1") = "black" And Range("B1") < 2: Range("C1")=14
Case Range("A1") = "black" And Range("B1")>=2: Range("C1")=30
End Select