pos = int(InputBox("何文字目に挿入するかを指定してください。"));
if (pos == 0) { return; }

value = InputBox("追加する文字列を入力してください。");
if (value == "") { return; }

for (y = SelTop; y <= SelBottom; y++) {
  for (x = SelLeft; x <= SelRight; x++) {
    [x,y] = left([x,y], pos) + value + mid([x,y], pos + 1);
  }
}