设置复合条件,该怎么处理

设置复合条件
条件1：第四列为细砂
条件2：第四列为粗砂
条件3: 第四列为花岗岩,并且为第七列含有字符全风化

但满足这三个条件之一时,第二列赋值123

如何设置这样一个复合条件
谢谢

[解决办法]

VB code

Sub Test()   If InStr("细砂粗砂", Cells(irow, 4)) Or Cells(irow, 4) & Cells(irow, 7) = "花岗岩*全风化*" Then Cells(irow, 3) = "123"End Sub