不用錯(cuò)誤分支語句：
Sub 分?jǐn)?shù)統(tǒng)計(jì)（）
Dim a%
For a = 2 To 8
If Cells（a, 2） = "未考" Or Cells（a, 3） = "未考" Then
Cells（a, 4） = ""
Else
Cells（a, 4） = Cells（a, 2） + Cells（a, 3）
End If
Next
End Sub
@ 倒背如流的派 Sub 分?jǐn)?shù)統(tǒng)計(jì)（）
Dim i%
For i = 2 To 8
If Cells（i, 2） = "未考" Or Cells（i, 3） = "未考" Then
Cells（i, 4） = ""
Range（"a" & i & ":d" & i）.Interior.ColorIndex = 3
Else
Cells（i, 4） = Cells（i, 2） + Cells（i, 3）
End If
Next
End Sub
承擔(dān)因您的行為而導(dǎo)致的法律責(zé)任，
本站有權(quán)保留或刪除有爭(zhēng)議評(píng)論。
參與本評(píng)論即表明您已經(jīng)閱讀并接受
上述條款。