エクセルにて指定文字数以上の時、自動で改行する方法について御存知であれば御教示下さい。

エクセルにて（当方エクセル2000使用）
例えば　A1のセルに100文字の日本語（かな、カタカナ、漢字、数字含む）を入力したとします。
A1のセルに10文字、B1に10文字、C1に10文字・・・J1に10文字と
自動で横のセルに入力をさせたいのですが
設定方法に付いて御存知の方、是非お教え下さい。
宜しくお願いします。

No.2 ベストアンサー 回答者： okormazd 回答日時： 2009/03/05 01:23

vbaを使わなければできない。

シートのコードモジュールに下記のような感じのコードを書けば、そのようなことができるが、それまで。

Private Sub Worksheet_Change(ByVal Target As Range)

r = Target.Row
c = Target.Column
If c = 1 Then
tstr = Target.Value
lst = Len(Target)
pst = 10
If lst >= 100 Then
For c = 0 To lst / pst
Cells(r, c + 1) = Mid(tstr, c * pst + 1, pst)
Next
End If
End If

End Sub

この回答へのお礼

有難う御座います。
vbaについては無知識ですが、試してみようと思います。

お礼日時：2009/03/05 21:59

No.1 回答者： orangezzzz 回答日時： 2009/03/04 10:55

こんにちは。

それは無理というものですよ。
文字入力機能はエクセルと別の制御ですから。