マクロ内の段落へのアクセス(Microsoft Word)
VBAマクロのプログラミングに関する優れた点の1つは、言語がオブジェクト指向であることです。これは、オブジェクトとオブジェクトのコレクションを使用して、ドキュメントのすべての部分にアクセスできることを意味します。つまり、段落を選択しなくても、段落を操作できます。
たとえば、ドキュメントの各段落に順番にアクセスし、その段落のテキストに対して何らかの処理を実行したいとします。
各段落はドキュメント内の個別のオブジェクトであるため、これは比較的簡単です。すべての段落オブジェクトは、Paragraphsコレクションの一部としてアクセスできます。次のコードでうまくいきます:
iParCount = ActiveDocument.Paragraphs.Count For J = 1 To iParCount sMyPar = ActiveDocument.Paragraphs(J).Range.Text [Add processing comments to manipulate sMyPar] ActiveDocument.Paragraphs(J).Range.Text = sMyPar Next J
コードの最初の行は、iParCountを現在のドキュメントの段落数に等しく設定します。次に、2行目から始まるループが、マクロの主要な作業を実行します。 3行目では、sMyPar文字列を指定された段落内のテキストと同じに設定します。 (Jが1に等しい場合、最初の段落で作業しています。Jが2に等しい場合、それは2番目の段落です。以下同様です。)
sMyParの処理が完了すると、次の行でドキュメントテキストがsMyPar文字列の変更されたテキストと等しくなります。
注:
このページ(または_WordTips_サイトの他のページ)で説明されているマクロの使用方法を知りたい場合は、役立つ情報を含む特別なページを用意しました。
_WordTips_は、費用効果の高いMicrosoftWordトレーニングのソースです。
(Microsoft Wordは、世界で最も人気のあるワードプロセッシングソフトウェアです。)このヒント(823)は、Microsoft Word 97、2000、2002、および2003に適用されます。Wordのリボンインターフェイス(Word 2007)用のこのヒントのバージョンを見つけることができます。以降)ここ:
linkマクロ内の段落へのアクセス。