DTP駆け込み寺

No.15377へ返信

記事投稿フォーム
補助
送信

[ 返信 ]

Re^3: WORDのルビ

たびたび失礼いたします
いろいろ確かめてみたもののなかなかうまく出来ません
プレーンな置換はできるのですが、フィールドコードのルビの拗促音のみの置換が出来なくて悩んでおります
ワイルドカードでは駄目なのでしょうか?

Sub ルビ拗促音大文字変換()
  Selection.Find.ClearFormatting
  Selection.Find.Replacement.ClearFormatting
  With Selection.Find
    .Text = "FQ*,(*ょ)\)"
    .Replacement.Text = "FQ*,(*よ)\)"
    .Forward = True
    .Wrap = wdFindContinue
    .Format = False
    .MatchCase = False
    .MatchWholeWord = False
    .MatchByte = True
    .MatchAllWordForms = False
    .MatchSoundsLike = False
    .MatchWildcards = False
    .MatchFuzzy = False
  End With
End Sub

実際はまとめて(ゃ ゅ ょ ャ ュ ョ)と出来ると思うのですが、
そこまでにはいたりません

ご指導お願いいたします m(_ _)m

[15377] 晴れのち晴れ (2013/03/15 Fri 14:30)