スキルアップ・問題解決なら、モーグにおまかせ！

Office2019です。
 
差込印刷で作成した文書の再印刷のＶＢＡを作成しています。
 
元の文書が１ページで作成された文書を使って、差込印刷で作成した文書は、セクションごとに１ページで作成されるため、セクション番号を指定して、再印刷する
という仕様を考えていますが、
指定したセクション番号が、文書中に存在しない場合、エラーメッセージを表示したい。
そこで問題となるのは、実際のセクショオン数と、コードで取得したセクション数が異なることです。
実際には、158セクションなのに
ThisDocument.sections.count
では、159が取得されます。
 
また、手操作で、
ページ指定で印刷する指定で
S159
を指定すると
158目
が印刷されます。
勿論、S158お指定すると、158目が印刷されます。
また、S160を指定すると、何のメッセージもなしで終了します。
 
S160(存在しない)セクションを指定してＶＢＡを実行するとフリーズします。
 
質問１
ThisDocument.sections.count
では、実際と違う理由は？
予め−１で考えてよいのか？
 
 
 
 
 

引用:
差込印刷で作成した文書

引用:
元の文書が１ページで作成された文書を使って、差込印刷で作成した文書は、
セクションごとに１ページで作成されるため、セクション番号を指定して、再印刷する

引用:
実際には、158セクションなのに
ThisDocument.sections.count
では、159が取得されます。

引用:
実際と違う理由は？

sk さんの引用:

実際のセクション区切りの数は 159 で間違いなく、
ただその中に「改ページを行なわないセクション区切り」が
1 つ混じっているだけです。