[已解决]多条件删除行问题!请各位帮忙看看。

liyiguitar-2

我想满足当每行的第14列等于“冶炼”时，同时它的第4列又不等于"JSYJB"或不等于"YJB"，就删除行。下面语句为啥不行啊，竟全给我删除了

ElseIf (Cells(i, 14) = "冶炼" And (Cells(i, 4) <> "JSYJB")) Or (Cells(i, 14) = "冶炼" And (Cells(i, 4) <> "YJB")) Then
   Rows(i).Delete

最佳答案

月排行榜 / 总排行榜

mxg825

2011-10-21 12:13

ElseIf Cells(i, 14) = "冶炼" And Cells(i, 4) <> "JSYJB" And Cells(i, 4) <> "YJB" Then
你的逻辑有误

跳转到最佳答案楼层

mxg825

ElseIf Cells(i, 14) = "冶炼" And Cells(i, 4) <> "JSYJB" And Cells(i, 4) <> "YJB" Then
你的逻辑有误

mxg825

优化你的代码
ElseIf Cells(i, 14) = "冶炼" And InStr("JSYJB", Cells(i, 4)) = 0 Then

fjmxwrs

ElseIf Cells(i, 14) = "冶炼" And Cells(i, 4) Like "*YJB" = False Then
就是第4列不包含YJB