WordVBA For each

マクロの親玉とでもいえば良いでしょうか、それとも、VBの家来とでもいえば良いでしょうか、VBA。久しぶりに用事があってWord用のVBAをタイプしようかと思いつきました。
循環処理には、自分のスタイルが古いこともあって 「for j=1 to n」「next j」というのを使いがちです。しかし、時代はオブジェクト指向。よって、循環処理でも「for each」「next」をつかうことにしました。

Sub 段落表示()
Dim para As Paragraph
For Each para In ActiveDocument.Paragraphs
Debug.Print para.range.Text
Next 'For Each para In Paragraphs
End Sub '段落表示()

ここまでやって、もう疲れました。普段使わないのでVBA用脳みそがどんどん退化しています。