Exce2010lの入力でこまっています。

質問

Excelの初心者です。
志望理由を記入したいのですが、用紙が原稿用紙のように1つの枡で（800字詰め）できているので、1つのセルを1つの枡にした用紙を作ったのですが、1つのセルに1文字ずつ入れていくのが大変なので
1つのセルに1文字入れたら、直ぐ次のセルにカーソルが動く設定方法が有りますでしょうか
教えてください。
あと、別のセルに書いた文章を貼り付けたら自動的に1つのセル（１文字）に１文字ずつ
貼り付けされていく方法はあるて゜しょうか。

回答No.2

esupuresso · ベストアンサー

取り敢えず画像を添付しますので（見ずらいかもしれませんが…）次のような手順で作業をしてみて下さい

Sheet2に行の高さと列の幅を整えます
1行を40文字とした場合の設定・・→列番号の「A」から「AN」までをドラッグします
次に列と列との境界線にカーソルを合わせマウスの左ボタンを押した状態で「22Pt」まで左方向へ寄せます
行の高さは規定値で22Ptになってますのでここはそのまま。
これで正四角形が出来ますので次へ・・・

Sheet1のセルK1をクリックして「=LEN(A1)」の式を入れ、セルK20まで式をオートフィルコピーします
（セルA1に入力した文字数が返ります）
セルA1に40文字入力したらセルA2に続きを入力します（1行に入る文字数は40文字までとします）

1行目から20行目まで入力し終わったらSheet2へ移動・・・
Sheet2のセルA1には次の式を入れます
=MID(Sheet1!$A1,COLUMN(),1)　の式を入れオートフィル機能を使い、式をセルAN1までコピーします
A1～AN1まで範囲選択された状態になりますので、そのまま20行目まで同じようにオートフィル機能を使いセルAN20まで式をコピーします

以上、手順に間違いが無ければ添付画像のように一升に1文字ずつセルの中に入ります

お礼

ＭＩＤ関数を使って、２０文字入ったセルを参照して、取り出す文字数を指定する引数を1にして1文字づつ取り出す。
COLUMN関数で文字を入れる場所を指定して、オートフィルで
1つずつずらしていく方法と理解しましたが、マクロはまだ
勉強していないのでオートフィルを使わずにＡ１，Ａ２、Ａ３と
1つづつ場所を指定してしまいました。
しかし、マクロは知っていると便利ですが、知らないと
異世界で何をしていかわからずバニックになりましたが
救っていただいて有難うございます。

、

回答No.3

0913

Wordには、原稿用紙がありますが、そちらではダメなんでしょうか？

お礼

wordにはまだ手を付けてないので全然わかりませんでした。
原稿用紙が表示されていなかったので、追加して作成してみましたが、指定された用紙にする事ができないか現在挑戦中ですが
ｗｏｒｄはまったくの素人なので苦戦しています。
それでも、解決の糸口を与えて頂いた事を感謝します。

回答No.1

red0176

Tabキーでカーソルを隣に移せます。

お礼

実際に入力しましたが、たしかに1マスずつずれます。
Ｗordは全然知らないので助かりました。
有難うございます。