Word 2007を使用しています。大きなファイルの中に数多くの同じ文字(ABC)を「囲い線」処理しています。下記のマクロは、囲い線処理をした文字「ABC」を検索して、そのすべての文字を太字に処理するもので自分で何とかでき、確かに動いていることは確認できました。加えて、囲い線を二重線にしたく、色々試してみましたが、うまくいきませんでした。インターネットを検索しても、いい例が見当たりません。どなたかご教授いただけませんでしょうか? それとも同時に囲い線の書式変更はできないのでしょうか?
Sub 囲い線変換()
Dim Test As Document
For Each Test In Documents
With Test.Content.Find
.Text = "ABC"
.Font.Borders.Enable = True
.MatchByte = True
.MatchCase = True
With .Replacement
.Font.Bold = True
End With
.Execute Replace:=wdReplaceAll
End With
Next Test
End Sub
No.1ベストアンサー
- 回答日時:
例えば、以下のようなマクロでしょうか?
Sub Test()
Dim rng As Range
Set rng = ActiveDocument.Range(0, 0)
With rng.Find
.Text = "ABC"
.Font.Borders.Enable = True
.MatchByte = True
.MatchCase = True
End With
With rng
Do While .Find.Execute = True
With rng.Font
.Bold = True
.Borders.OutsideLineStyle = wdLineStyleDouble
rng.SetRange rng.End, rng.End
End With
Loop
End With
End Sub
アクティブなファイルで上記のマクロを実行すれば、[囲み線]のテキストを
[太字]+二重の[囲み線]にします。
enunokokoro様
ありがとうございました。早速実施し、希望通りになりました。他にも応用できるのではないかと考えております。 本当にお世話になりました。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) 【追加】ファイルを閉じてダイアログで保存した時だけ処理の実行をする 3 2022/03/23 15:43
- Visual Basic(VBA) 【Excel VBA】自動メール送信の機能追加 5 2022/09/29 12:53
- Visual Basic(VBA) 以下のVBAで該当文字列の前後に付与したい。 例 前に付与 abc ユーザーID 12345 後に付 3 2022/04/19 21:50
- Excel(エクセル) エクセルシート中の全角英数字を半角に変換したい 4 2022/07/07 13:14
- Excel(エクセル) エクセルのVBAについて とあるサイトのコードを参考に、CSVの文字化けを直すVBAを作成しているの 7 2022/11/04 14:15
- Visual Basic(VBA) 指定文字を太字にするVBAを別シートのセルを指定する構文(改良について) 6 2022/08/27 22:11
- Visual Basic(VBA) シフト表のコマで「ブロック」されている前の時間の「出」を同一列の「休」と入れ替えたいがふぇきません。 2 2023/08/02 18:49
- Visual Basic(VBA) Excel VBA 教えてください。 VBA初心者です。 詳しい方がいましたら教えてください。 下記 3 2023/04/25 11:22
- Visual Basic(VBA) エクセルVBAのコードで質問です。 下のコードはJ16の文字列をB3を起点とする範囲から探して、見つ 5 2023/04/07 11:07
- Visual Basic(VBA) セルの値からファイルを複数作りたい2 3 2022/10/07 15:54
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
からめ手って
-
飛車→龍、角行→馬になるのはなぜ?
-
先程アルミホイルに塩とお湯を...
-
中飛車対策について
-
なんで飛車と角が成っても、成...
-
矢倉を覚えた初心者なのですが...
-
居飛車党のゴキゲン中飛車対策 ...
-
銀製かわからないジッポライタ...
-
1ヶ月トータル15万歩は、少ない...
-
将棋は居飛車と振り飛車どちら...
-
五目並べ必勝法
-
五目並べで後手の必勝法について
-
一手すきと二手すきの違いの説明
-
レミゼラブルの銀の燭台の話は...
-
級位者が囲いを意識して戦うとき
-
後手三間を指す人の自信は一体...
-
五目並べは先手必勝?
-
居飛車党に聞くけど、24常駐...
-
後手なら一手損角換わりをすべ...
-
銀冠を目指す意図
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
おすすめ情報