要一个多条件判断语句！求助！

yueaiting · 发表于 2020-3-13 14:40

本帖最后由 yueaiting 于 2020-3-13 14:43 编辑

QQ截图20200313143409.png

这是一个存档功能，之前是通过日期不同（O列）判断是否需要存档，这个就能正常实现，代码如下：
If .Cells(i, 2) = Sheet5.Cells(j, 3) And .Cells(i, 15) = Sheet5.Cells(j, 12) Then
                  isOld = True
                  Exit For
            Else
                  isOld = False
            End If

后来觉得不完善，想通过N,O,P,Q任意一列有更改都存档。我就改成如下代码：

For j = 2 To mt
      If .Cells(i, 2) = Sheet5.Cells(j, 3) And .Cells(i, 14) = Sheet5.Cells(j, 11) And .Cells(i, 15) = Sheet5.Cells(j, 12) And .Cells(i, 16) = Sheet5.Cells(j, 13) Then
                  isOld = True
                  Exit For
         Else
                  isOld = False
         End If
Next j

老是调试出错！望高手指教啊！

yueaiting · 发表于 2020-3-13 15:01

出错的提示

yueaiting · 发表于 2020-3-13 15:03

不知道是什么原因！

yueaiting · 发表于 2020-3-13 16:44

本帖最后由 yueaiting 于 2020-3-13 16:46 编辑

自己捣鼓了一会可以搞定了，每个单元格都赋值成功，前面1-8列都可以成功写入存档的页面！9列以后就是不写入！不知道什么情况@

		自动登录	找回密码
密码			免费注册