電子書籍の厳選無料作品が豊富!

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

例えばこんな感じです。

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

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

A 回答 (2件)

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


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

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

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

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

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文字ずつ区切りを入れてくれるはず?
動かない可能性大。
    • good
    • 0

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!