質問

文字列「いいえ」のすべての出来事を見つけたい。 + 1〜9の間の整数。次に、「いいえ」を削除します。整数をパラントシス間で包みます: "(4)"または "(67)"。例「いいえ34」は「(34)」になるはずです。

私は複数の問題を抱えているようです(Word 2010):

  1. コードは1つの整数のみを置き換えます。 1つまたは2つの整数の両方を見つけるにはどうすればよいですか?
  2. .replacement.textに「いいえ」という単語は含まれていません。 (ここまでxxxxxを入れました)。
  3. 私のコードはパラントシスを追加しますが、アクティブなドキュメントの最初と終わりに。代わりに数字をラップするにはどうすればよいですか?

    With Selection.Find  
        .Text = "n[or]. [1-9]"  
        .Replacement.Text = "XXXXX"  
        .Forward = True  
        .Wrap = wdFindContinue  
        .Format = False  
        .MatchCase = False  
        .MatchWholeWord = False  
        .MatchWildcards = True  
        .MatchSoundsLike = False
        .MatchAllWordForms = False  
    End With  
    Selection.InsertBefore ("(")  
    Selection.InsertAfter (")")  
    Selection.Find.Execute Replace:=wdReplaceAll 
    
役に立ちましたか?

解決

次のソリューションで試してみてください:

With Selection.Find
    .Text = "(No.)( )([1-9]{1;2})"
    .Replacement.Text = "(\3)"
    .Forward = True
    .Wrap = wdFindContinue
    .Format = False
    .MatchCase = False
    .MatchWholeWord = False
    .MatchWildcards = True
    .MatchSoundsLike = False
    .MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
ライセンス: CC-BY-SA帰属
所属していません StackOverflow
scroll top