wordで文章中に等間隔で「/」を挿入する方法

wordで文章中に等間隔で「/」を簡単に挿入する方法をご存じの方いませんか？

例えばこんな感じです。

あいうえおかきくけこさしすせそなにぬねのはひふへほまみむめも
↓
あいうえお/かきくけこ/さしすせそ/なにぬねの/はひふへほ/まみむめも

No.2 ベストアンサー 回答者： enunokokoro 回答日時： 2009/08/24 18:59

「等間隔」の意味が、全角文字数での指定なのか、単純に文字数ごとでの

間隔なのか判断しかねますが、仮にすべて全角文字になっている文章を
５文字ごとにスラッシュで区切るだけなら、一般機能の[置換]でも可能
です。

[置換]ダイアログで[ワイルドカード]にチェックを入れておきます。

[検索する文字列]： (?{5,5})
[置換後の文字列]： \1/

これで[置換]または[すべて置換]をしてみてください。

No.1 回答者： JavaJavax2 回答日時： 2009/08/23 22:28

Dim Str

Dim cn

cn = 5
Str = Selection.Text

for i= 1 to len(Str) Step cn
Buff = Buff & Mid(Str,i,cn) & "/"
next i

Selection.Text = Buff

ワードが無いからテストできないけどこんな感じ？
選択した範囲に5文字ずつ区切りを入れてくれるはず？
動かない可能性大。