判断VBA代码
Sub 判断() Dim i Worksheets(2).Activate '激活表2 For i = 4 To 8 '在4行到8行循环 If Range("A" & i) = "有" And Range("B" & i) >= 20 Then Range("c" & i) = "符合" Else Range("c" & i) = "不符合" End If Next MsgBox "执行完毕!" '对话框 End Sub
© 版权声明
1.文章版权归作者所有,可以不经允许任意转载。
2.如有侵权请告知,我会第一时间删除。
THE END
请登录后查看评论内容