[[20060114135406]]　『数字を増やしたいです。』（ゆう）　ページの最後に飛ぶ

『数字を増やしたいです。』（ゆう）

印刷をするたびに、エクセル上の数字を増やしたいのですが、
そういった関数や、マクロなんてあるのでしょうか？
あれば、教えてください。
よろしくお願いします。

 カウントはブックを閉じても保持するのか、
 全てのシートの印刷に対応するのか、
 など不明点が多いですが、
 何にも考えずにカウントをセルに書き込ん
 でいくのならこんなかんじでしょうか。

 Private Sub Workbook_BeforePrint(Cancel As Boolean)
  With Worksheets("Sheet1").Cells(1,1)
   .Value = .Value + 1
  End With
 End Sub
 ※プレビューにも反応します。

 (MARBIN)

 ブックを閉じてもカウントを保持し、しかも
 ブックを上書き保存しない場合がある、のなら、
 他のブックやテキストファイルなどをカウント
 用に作っておき、カウントの読込み、カウント
 の再書き出だし、が必要になります。
 (MARBIN)

コメント返信：

[ 一覧(最新更新順) ]

[[20060114135406]] 『数字を増やしたいです。』（ゆう） ページの最後に飛ぶ

[[20060114135406]]　『数字を増やしたいです。』（ゆう）　ページの最後に飛ぶ