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

for (y = 2; y <= Bottom; y++) {
  [x,y] = left([x,y], len([x,y]) - c);
}