循环多个条件运行时溢出

Question

嗨我的代码如下，我的循环有多个条件。 我一次尝试使用一个条件我的代码并且它可以工作但是当我添加AND以同时拥有多个条件时，我得到了一个

  

运行时错误6 - 溢出

周围有没有？

    J = 2
    Do Until ((SubActivity = fxlm.Range("B" & J).Value) And _
              (Plt = fxlm.Range("C" & J).Value) And _
              (Pl2 = fxlm.Range("D" & J).Value) And _
              (Pl2 = fxlm.Range("E" & J).Value) And _
              (Plb = fxlm.Range("F" & J).Value))
        J = J + 1
    Loop
    MsgBox J

由于