ワークシートの印刷ページ数をカウントする

Question

Excelワークシートがプログラムによって拡張される印刷ページの数を確認する方法はありますか？

同じ文書を自動的に作成します。しかし、ドキュメントに複数のページが含まれている場合は、新たに作成する必要があります。

文書をプログラムで作成した後に印刷ページの総数を取得する方法はありますか。

Answer 1

PageBreaksを使用すると、このトリックが実行されます。 ;）

Public Function Printed_Pages_Count(wS as Worksheet) As Integer 
    Printed_Pages_Count = (wS.HPageBreaks.Count + 1) * (wS.VPageBreaks.Count + 1) 
End Sub