カスタムの見出しスタイルを持つ Word 文書がいくつかあります。
ドキュメント内のすべてのカスタム見出しを反復処理し、カスタム スタイルを標準の見出しスタイルに置き換えたいと考えています。
例えば：
Custom Style Standard Style
=================== ==============
Heading 1. Numbered --> Heading 1
Heading 2. Numbered --> Heading 2
Heading 3. Numbered --> Heading 3
など、見出し 5 まで ...
MSワード2007を使用しています。
質問: VBA でこれを行うにはどうすればよいですか?