築和工房パソコン教室

初めてパソコンに触る方、エクセルやワードの実用的な利用方法を知りたい方、MOSやパソコン検定の資格を取得したい方、ホームページを作りたい方、Illustratorなどの専門的なアプリケーションを使いこなしたい方。幅広く総合的にパソコンを利用するノウハウをお手軽な金額でご指導いたします。

タグ:Word

WordのVBAを利用して、ルビを削除してみた。
でも、フィールド更新がVBAにできなかったので、その部分は手動。
そのうちに、完全VBAにしたいものだ。
 
Sub ルビ一括削除()
'
' ルビ一括削除 Macro
' ルビを一括で削除します。
'
'  ------すべて選択( Ctrl + A )
    Selection.WholeStory
'  ------フィールドコード表示
    ActiveWindow.View.ShowFieldCodes = Not ActiveWindow.View.ShowFieldCodes
'  ------ 置換
    Selection.Find.ClearFormatting
    Selection.Find.Replacement.ClearFormatting
    With Selection.Find
        .Text = "EQ*\),(*)\)"
        .Replacement.Text = "COMMENTS \1"
        .Forward = True
        .Wrap = wdFindAsk
        .Format = False
        .MatchCase = False
        .MatchWholeWord = False
        .MatchByte = False
        .MatchAllWordForms = False
        .MatchSoundsLike = False
        .MatchFuzzy = False
        .MatchWildcards = True
    End With
    Selection.Find.Execute Replace:=wdReplaceAll
'  ------ ここまでが置換
   
'  ------ メッセージボックスを表示
    MsgBox "(1) 右クリックして「フィールドの更新」をクリック" & vbCrLf & "(2) Alt + F9"
End Sub

もうちょっと、研究してみようと思います。

年賀状、挨拶状、連絡などのはがきで、wordの差し込み印刷の宛名印刷は、とても便利です。
でも…
奥様、ご家族、同僚など「連名」で名前を記述する場合、
敬称の表示が問題となります。

単純に「様」をつけておくと「連名」がない場合は、「様」が邪魔になります。
かといって、敬称なしでは大変失礼に当たります。
条件によって。敬称を付けたり、つけなかったり…
簡単にできないものでしょうか?
15092102

続きを読む

↑このページのトップヘ