已验证 tj(1,2)=tj.offset(0,1)
![]() |
一只刺儿兔
展开
|
![]() |
游客
展开
|
![]() |
游客
展开
|
![]() |
游客
展开
|
![]() |
wylben
展开
|
![]() |
wurenyuebing
展开
Sub 计算人数()
Dim num%, p1, p2, p3
num = 1
Do Until Cells(num + 1, "b") = ""
num = num + 1
If Cells(num, "b") Like "[89]?" Then
p1 = p1 + 1
End If
If Cells(num, "b") Like "##*" Then
p2 = p2 + 1
End If
If Cells(num, "b") Like "*[!0-9]*" Then
p3 = p3 + 1
End If
Loop
Cells(2, "h") = p1
Cells(3, "h") = p2
Cells(4, "h") = p3
End Sub
我把老师写的分解成了三个if语句 |
承担因您的行为而导致的法律责任,
本站有权保留或删除有争议评论。
参与本评论即表明您已经阅读并接受
上述条款。