Excel2000でのマクロからの印刷で総ページ数がずれる

Question

Excel2000のVBAで非表示になっているシートの印刷を行っています。その際に実際には2ページ分までしかデータはないのに、1/3、2/3とフッター部に出力されます。

※データ行数に応じて正しく出る場合もあります。

マクロを使用せずに印刷を行うと正しく1/2、2/2と表示されます。　

また、非表示シートを一度アクティブにしてやるとマクロからの印刷でも正しくページ数が出力されます。

Excel２０００では非表示シートをマクロから印刷すると総ページ数が正しくでないものでしょうか。　Excel2003で動かした場合は正しく動いていました。

ご存知の方がいられましたら教えていただけると助かります。

Answer 1

そうですか。

すみませんが、もし、2000固有の話であるとすると、さすがに2002以前のバージョンは残っておりませんので、私には確認のしようもありません。

ただ、プリント関係のトラブルはPCの違いかプリンタドライバの問題というのが相場なんですがね。

あと、すぐできるチェックとしては、Excelのセーフモード（CTRLキーを押しながら、Excelショートカットから起動）して、そこからブックを開いた場合どうなるかです。

また、新規ブックで似たようなものを作ってそれが正常であれば、問題のブックが壊れているか壊れかけている可能性も否定できません。

参考まで。

Answer 2

y sakuda さん、アドバイスありがとうございます。

伊藤 itou さん、こんにちは。 その後、いかがですか。

まずは問題の切り分けのため、y sakuda さんからアドバイスをいただきましたように、Office のセーフ モードや新規ブックで試しすとどうかなど、確認してみてくださいね。

印刷を実行する部分の実際のコードも書いていただくと、何か知っているという方からのアドバイスもいただけるかもしれません。

同じような問題でお悩みの方にも問題の確認点としてご参考になるよう、 \[回答としてマーク\] をいたしました。

もちろんマーク後も返信は出来ますので、さらに質問がある場合は、ご遠慮なく投稿も行ってください。

確認の結果もお待ちしています。

Answer 3

回答ありがとうございます。

改ページプレビューでも2ページに収まりますし、印刷範囲の設定も余計なエリアはありません。

またdebug.printで改ページの数を表示させても縦方向に１となります。

印刷プレビュー時は1/3と2/3のみ表示されます。3/3は存在しないため、プレビュー上もありません。

Answer 4

その場合、印刷すると白紙ページはでませんか？

また、PCは同じPCでしょうか？

マクロからどうこうと言うより、使用プリンタによってページがはみ出して総ページ数が変わることは良くあります。

非表示シートを表示して、改ページプレビューでどうなっているか確認してみてください。

まあ、手動では正しく出るとおっしゃってますので、改ページプレビューで正常に見える可能性が大ですが一応調べてみてください。