读书人

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

发布时间: 2012-02-22 19:36:55 作者: rapoo

设置复合条件
条件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 

读书人网 >VBA

热点推荐