VBA第六課 循環判斷數據
來源：程序員人生 發布時間：2015-07-28 07:44:27 閱讀次數：2843次
Sub do_loop循環判斷()
Dim cj%
cj = 1
Do
cj = cj + 1
If cj > 10 Then
Exit Do '退出循環
Else
If Cells(cj, 2) >= 90 Then Cells(cj, 3) = "優秀"
If Cells(cj, 2) >= 80 And Cells(cj, 2) <= 90 Then Cells(cj, 3) = "良好"
If Cells(cj, 2) >= 60 And Cells(cj, 2) <= 80 Then Cells(cj, 3) = "合格"
If Cells(cj, 2) < 60 Then Cells(cj, 3) = "不及格"
End If
Loop
End Sub
轉載請注明作者與出處：http://blog.csdn.net/u013511642 王小濤_同
生活不易，碼農辛苦
如果您覺得本網站對您的學習有所幫助,可以手機掃描二維碼進行捐贈
