vba-多列同时查找满足条件的行号

我首先想到的非环版本要做到这一点(循环简单得多),是使用匹配(),但如果你有多个值使用A = Q或同日在那里,你可能会遇到一个问题。

Dim i,j as Integer 

i=Application.Match(RefCell1,LookUp1,0).Row 
j=Application.Match(RefCell2,LookUp2,0).Row 

If i=j Then 
    HdrRow=i 
    Else 
End If 

我特别没有使那个匹配场景的If语句条件更容易阅读和编辑。

使用这种方法,您会遇到存在多个相同值的问题。这个是匹配单个吧

另一种方法是使用嵌套的if语句:

Dim i as integer 

i=Application.Match(RefCell1,LookUp1,0).Row 

If Application.IfError(i,0)>0 Then 
    If Cells(i,"Q").Value=http://cn.voidcc.com/question/Cells(RefCell1Row,"A").Value 
     HdrRow=i 
     Else 
    End If 
    Else 
End If 

最后,我还是希望推荐一个循环,这样就可以评估每行线,这将建立在第二种方法。

posted @ 2022-12-29 09:39  vba是最好的语言  阅读(622)  评论(0编辑  收藏  举报