ͳ¼ÆÈËÊýʱ,FOR Óï¾ä for j=I+1 to 16

Sub ¹ý³ÌÃû2£¨£©
Dim I!, U!
For I = 1 To 16
If Cells£¨I, 1£© = "2°à" Then
Exit For
End If
Next
For U = 1 To 16
If Cells£¨U, 1£© = "3°à" Then
Exit For
End If
Next
Range£¨"E2"£© = "2°àµÄÈËÊýΪ:" & U - I
End Sub

½²µÄºÜÏêϸÄØ

ÀÏʦ½²µÄºÜºÃ£¬¶ÔÎҵİïÖúÒ²ºÜ´ó£¬Ð»Ð»ÀÏʦ£¡

´ò¿¨

²»´í£¬½²µÄ¼«ºÃ¶®£¬¾­µäÊÓƵ°¡£¡