word vba ページコピーの仕方について

Question

ワードで指定したページをコピーするコード書き方がわからないのですが、例文か何かありますか？

Answer 1

このサイトが参考になるのではないでしょうか。
参考ページ

このサイトでは、ワードの文書を一ページごとに処理する方法が書かれているようです。
例えば、このLoopを何かでカウントして、特定のカウントになった時のみ、処理を実行するといった工夫を行えば、指定したページのみに、処理を行えると思います。

私が指定したページのみに処理を行うなら、参考ページのコードにこのように付け足します。
２ページ目になったときに処理を実行することとします。完全にコピペなので、この内容をすべて解説することはできません。何か疑問があれば、新しく疑問に思ったことを質問されて別の方に助けを求めてください。

Sub Sample()

  （略）
     
    If active_page = 2 Then 'ここでページ数を指定。例えば２ページ目。
    '---------------------------------------------
        doc.Bookmarks("\page").Select '何らかの処理
    '---------------------------------------------
    End If
     
    （略）

End Sub