0

テキストの本文全体に数値参照が含まれる単語文書があります。たとえば、「テキスト文字列 1」 ###:### 「テキスト文字列 2」。番号参照の真ん中にあるコロンに注意してください。数値参照は、コロンの両側で 1 ～ 999 の範囲である場合がありますが、すべての参照では、コロンの両側に少なくとも 1 つの数字があり、両側に 3 つ以下の数字があります。

ドキュメント全体をスキャンし、各数字参照を識別し、数字参照の前にキャリッジ リターンを入力するルーチンが必要です。したがって、すべての数字参照がドキュメントの段落を開始します。これを説明するために、上記の例は次のように変換されます...

「文字列1」

"###:###" "テキスト文字列 2"

これを行うために検索/置換操作を変更しようとしましたが(目を疑うところまで)、それを理解できないようです。

どんな助けでも大歓迎です。ありがとうございました！

4

2 に答える 2

1

MS Word に機能がある限り、ここでRegExpを使用するのは少し複雑だと思います。Find-Replaceこのコードで試してください：

Sub Find_Replace_Macro()

    Selection.Find.ClearFormatting
    Selection.Find.Replacement.ClearFormatting
    With Selection.Find

        .Text = "([ ])([0-9]{1;3}:[0-9]{1;3})"    'solution for non-English version of MS-Word
        .Text = "([ ])([0-9]{1,3}:[0-9]{1,3})"    'solution for English version of MS-Word
        .Replacement.Text = "^13\2"
        .Forward = True
        .Wrap = wdFindContinue
        .Format = False
        .MatchCase = False
        .MatchWholeWord = False
        .MatchAllWordForms = False
        .MatchSoundsLike = False
        .MatchWildcards = True
    End With
    Selection.Find.Execute Replace:=wdReplaceAll
End Sub
于 2013-10-17T20:39:08.013 に答える