PowerPoint Interop を使用してドキュメント全体を印刷するときに、印刷されると予想されるページ数を取得しようとしています (範囲は適用されません)。
より具体的には、印刷プレビューが示すページ数を取得しようとしています(これはすべての書式設定オプションを考慮しているため)。
例: 48 枚のスライド ドキュメントがありますが、印刷すると 56 枚の画像が生成されます。
現在、パラメーターなしで Printout() メソッドを呼び出しています。
PowerPoint Interop を使用してドキュメント全体を印刷するときに、印刷されると予想されるページ数を取得しようとしています (範囲は適用されません)。
より具体的には、印刷プレビューが示すページ数を取得しようとしています(これはすべての書式設定オプションを考慮しているため)。
例: 48 枚のスライド ドキュメントがありますが、印刷すると 56 枚の画像が生成されます。
現在、パラメーターなしで Printout() メソッドを呼び出しています。
私の知る限り、あなたが求めるその数を直接取得する方法はありません。印刷はドライバーによって処理されるため、vba はおそらくそれを認識していません。
面倒な解決策は、xps ファイルを一時的に生成してそのページをカウントすることです。しかし、正確にはエレガントではありません。もう 1 つの方法は、各スライドのページ数をスライドごとに決定し、それぞれにスライドのプロパティとしてインジケーターを配置し、2 番目のステップでスライドをインクリメントしてカウントすることです。これは興味深いかもしれません: http://officeone.mvps.org/vba/ppt_tags.html