Access VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
989 / 2272 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【9219】レポートのカウントをしたい isobe 07/3/24(土) 18:39 質問[未読]
【9222】Re:レポートのカウントをしたい Gin_II 07/3/26(月) 10:02 発言[未読]
【9239】Re:レポートのカウントをしたい Gin_II 07/3/27(火) 23:44 発言[未読]
【9219】レポートのカウントをしたい
質問  isobe  - 07/3/24(土) 18:39 -
引用なし
パスワード
   ADOのDo Until RST.EOFでﾃｰﾌﾞﾙ：勘定科目のIDで伝票からデータをを抽出し、勘定科目ごとにレポートを作成しています。
ところが勘定科目を総て印刷すると２０分くらいかかってしまいます。
フォームを１つ作り、「何件の印刷データがあり、現在何件目を印刷中です。」という表示をさせ、印刷が終了したら「終了しました。」というメッセージを表示させ、終了させたいと思います。
「何件の印刷データがあります。」は、DCount("ID","T勘定科目")で設定すれば出来るのですが、レポートの件数を出す方法が判りません。どなたかご教授して下さい。
【9222】Re:レポートのカウントをしたい
発言  Gin_II  - 07/3/26(月) 10:02 -
引用なし
パスワード
   > ところが勘定科目を総て印刷すると２０分くらいかかってしまいます。

何ページぐらいあるんでしょうか？


> フォームを１つ作り、「何件の印刷データがあり、現在何件目を印刷中です。」
> という表示をさせ、印刷が終了したら「終了しました。」というメッセージを表示させ、
> 終了させたいと思います。

現在の1.5倍ぐらい時間がかかることになるかもしれませんがいいのでしょうか？
【9239】Re:レポートのカウントをしたい
発言  Gin_II  - 07/3/27(火) 23:44 -
引用なし
パスワード
   > 70〜80件くらいです。

ちゃんと見てはいますが、なにゆえ新規スレッドあげまくりなんでしょうか？ ^^;

あと、このページ数については興味本位で聞いているので、きちんとした回答は
できないです。

ちなみに、レーザプリンタなんかを使っていて、それだけかかるんですか？
そうであれば、どのようなコードを記述しているのかも気になります。
（これも興味本位です。）

ただ、それを提示してもらうと、そっちの改善案がでるかも。
（ほかの誰かから ^^;）
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
989 / 2272 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
1080804
(SS)C-BOARD v3.8 is Free