i = 2
do While Range(" B " & amp； I). Value & gt ""
If i = 2 or range ("b"&; I). Value < > range ("B" & ampi-1). That's worth it.
k = i
Scope ("E"&). value = Range(" C " & amp； I). value
Range ("F"&). value = Range(" D " & amp； I). value
other
If range ("C"&). Value & gt range ("E" & ampk). That's worth it.
Range ("E" & ampk). value = Range(" C " & amp； I). value
If ... it will be over.
If range ("D"&). Value & gt range ("F" & ampk). That's worth it.
Range ("F" & ampk). value = Range(" D " & amp； I). value
If ... it will be over.
If ... it will be over.
i = i + 1
ring
End joint