program.station.ez-net.jp このような記事を見つけました。コンテンツコントロールというすごいものがWordにある。 これはイイ。 Wordはけっこう使ってるつもりだったんですが,今回マクロでいじろうと思うまで,コンテンツコントロールというものの存在を知りませんでした。 開発のリボンにたしかに知らないものがある。 挿入して,そのプロパティを見ることができます。いろいろあるけど,タイトルとタグの二つを設定できるようです。 これは期待できます。 使ってみたら,これはすごい。考えた人すごい。久々にWordに感動した。キミモスゴイヤツダ。 3つのコンテンツコントロールを入れ,タイトルは CC1 CC2 CC3 タグにはすべて CCといれました。 このようなコードを書いてみる。 Sub Test() Dim Doc As Document Set Doc = ActiveDoc