| 
    
     |  | ▼クレア さん: こんにちは。
 test
 >Do While Len(Cells(sYLINE, 4).Value = Cells(sTYLINE, 4).Value)
 > If (Cells(sYLINE, 4).Value = "") Then
 >   Exit Do
 > End If
 > sYLINE = sYLINE + 1
 >Loop
 >
 test2
 >Do While (Cells(sYLINE, 4).Value = Cells(sTYLINE, 4).Value)
 > If (Cells(sYLINE, 4).Value = "") Then
 >   Exit Do
 > End If
 > sYLINE = sYLINE + 1
 >Loop
 微妙に違うと思いますよ。
 
 
 Do While 〜 Loopは、
 「While以下の条件がFalseではない間、ループする」というロジックみたいです。
 
 testの「Len(Cells(sYLINE, 4).Value = Cells(sTYLINE, 4).Value)」
 は、
 
 "True"の場合、長さは4で"FALSE"の場合は、5。
 
 どっちもFalse(0)でないから、出口は、Exit Doしかありません。
 
 
 test2には、
 While以下の条件がFalseの時とExit Doと二つ出口があります。
 
 |  |