>>392
2重ループ脱出はForとDoを併用するのが常套手段

For intI = 3 To 65535
  Do Until intJ = 255
    Exit For
  Loop
Next intI