エクセルでタイトルを指定すると、タイトルだけのページが多数出力される

いつもお世話になっています。

名簿を使用しているのですが、条件だけをあう人を印刷ページに転記し、そして印刷するというVBAを作成しています。タイトルについては、名簿データの氏名、住所などの項目をタイトルとして設定しています。

ところが、印刷をした際には、タイトルだけのページが多数印刷されてしまいます。もちろんプレビューで確認して印刷ページを指定すれば可能なのですが、１０～５０ページぐらいになるため、できればそんな面倒なことをしたくありません。

いろいろネットをみてみたのですが、どうもよくわかりませんので、方法についてご教示いただければ幸いです。

なお。エラーメッセージが空白に設定されているということはありません。

質問者からの補足コメント

• 現状の書き方が不十分でしたので補足させていただきます。これはVBA を一部使用しています。
  
  前提
  （１）ブックは、データ用ページ（複数）と印刷用ページから構成
  （２）データ用のページは１００名もあれば１０００名もある
  （３）印刷用のページは、必要項目をあらかじめタイトルとして設定
  
  VBAの構成
  （１）最初に印刷用ページの２行目以降を.ClearContents、ClearFormatsで初期化
  （２）データ用のページから必要項目だけを抽出して印刷用のページに転記。
  （３）転記が終了すれば、 Cells.RowHeight で行の高さを調整
  
  問題点
  （１）最初に１０００名のシート出力すると問題なし
  （２）次に１００名のシート出力すると、必要ページの後タイトルだけのページがたくさんでてくる
  （３）改ページプレビューで確認すると、空白のページのみ続いている
  (続きます）

    補足日時：2019/08/12 05:39

• おそらく、最初に出力した書式がそのまま残っていると思われますが、その書式をクリアする方法がわかりません。
  
  よろしくご教示いただきますようお願いいたします。

    補足日時：2019/08/12 05:41

• もう一度、質問をしなおします。
  ご教示ありがとうございました。

    補足日時：2019/08/12 09:31

No.3 ベストアンサー 回答者： fujillin 回答日時： 2019/08/12 07:30

No2です。

https://docs.microsoft.com/ja-jp/office/vba/api/ …

No.2 回答者： fujillin 回答日時： 2019/08/12 01:59

こんばんは

具体的な処理内容が不明なので、質問文にある情報だけからの推測になりますが・・・

＞印刷をした際には、タイトルだけのページが多数印刷されてしまいます。
エラーは出ていないとのことですので、そのように処理を行うブログラムになっている可能性が高いのではないでしょうか。
要は、ブログラム通りに処理が実行されると、ご質問のようになるようになっていて、正常に処理がなされた結果だということでは？

この回答へのお礼

早速のご教示ありがとうございます。

情報を補足させていただきました。よろしくご教示お願いいたします。

お礼日時：2019/08/12 04:27

No.1 回答者： googoo900 回答日時： 2019/08/11 12:21

印刷ページに空白部分があるか、印刷設定(ページ設定)がよくないのだと思います。

印刷ページを改ページプレビューで見てみましょう。

改ページプレビューのやり方は以下です。
メニュー　→　表示　→　改ページプレビュー

この回答へのお礼

早速のご教示ありがとうございます。

改ページプレビューでは、必要な表のあとでも、タイトルだけであとが空白のページが何ページも続いている状態です。

お礼日時：2019/08/12 04:26