エクセルでマクロのページカウンタ印刷表示

質問

エクセル2002で，Sheetに表があります．同じ表を使用します．データは１０件分入ります．
１０件を超えると次の用紙に印刷をします．
印刷はマクロ命令で作成しています．
印刷の際，ページ番号をふりたいのですが
どのように記述すればいいのか，わかりません．
１枚目には「１ページ」，２枚目には「２ページ」のように印刷できるとありがたいのです．
どなたか，ご教授をよろしくお願いいたします．

回答No.1

toshi_2000 · ベストアンサー

page1を印刷するページの変数とすると、次のようになります。
With ActiveSheet.PageSetup
.CenterHeader = page1 & "ページ"
End With

お礼

ありがとうございます．参考になりました．

回答No.2

o_chi_chi

下記でファイルのページ設定のフッタに設定したのと
同様のことができます。
---
With Worksheets(1).PageSetup
.CenterFooter = "&P" & "ページ"
End With

お礼

ありがとうございます．参考になりました．