function leftB(str, len) {
  for (i = len; i > 0; i--) {
    s = left(str, i);
    if (lenB(s) <= len) {
      return s;
    }
  }
  return "";
}


len = int(InputBox("文字数を入力してください。"));
if (len == 0) { return; }

for (y = 1; y <= Bottom; y++) {
  [x,y] = leftB([x,y], len);
}