vb中judge是什么意思

这一节理解起来可能会有些困难，可能需要不断的反复的去复习才能理解，我起初学习也是这样，学了马上就忘记了，然后不断的重头来，这样直到掌握为止，可能一开始就没有理解透彻吧。

我们还是举个例子来说明我们今天要给大家介绍的内容吧。我们经常会碰到一些数据，然后用条件格式进行一些处理加工，比如成绩吧，低于60的，我们显示红色，其他不变，相信这个大家都会了。那么我们今天用VBA来实现：如果成绩小于60，那么60那一栏会显示字样：有待改进：59（59为该人实际得分）

代码如下：

Sub example()

With ThisWorkbook.Worksheets(1)

maxrow = .UsedRange.Rows.Count

For i = 2 To maxrow

If .Cells(i, 2).Value

.Cells(i, 2).Value = "有待改进：" & .Cells(i, 2).Value

End If

Next

End With

End Sub

大家在第二行填写好分数之后，运行该程序就可以看到变化了。

说到这里可以大家还是不明白，这个跟以前学习的没什么区别的嘛，不慌，我们接着往下走。

如果我们只想判断A2单元格中的内容是否小于60，如果小于的话就把里面的内容改成：不合格（分数）。看代码：

sub celljudge()

with thisworkbook.worksheets(1).cells(1,2)

if.value

鹏仔微信 15129739599 鹏仔QQ344225443 鹏仔前端 pjxi.com 共享博客 sharedbk.com