• ベストアンサー

ACCESSで印刷プレビューをした後の印刷ボタンを押したイベント取得につて

現在、アクセスにてプリントレポートを印刷する際に一度印刷プレビューを行った後問題が無ければ印刷を実行するソフトを作成しているのですが、実際に印刷したときのみ履歴を残したいと考えておりますが可能なのでしょうか？ DoCmd.OpenReport　"レポート名",acViewPreview をコールしたタイミングで履歴を取ると、その後印刷しなくても履歴が 残ってしまいます。 なにかいい方法があれば教えて下さい。

質問者が選んだベストアンサー

  • ベストアンサー
  • nicotinism
  • ベストアンサー率70% (1019/1452)
回答No.1

参考となるかと思います。 印刷かプレビューか、それが問題だ YU-TANG 氏の考察です。 http://x7net.com/~access/AcTipsHowToDetermineReportInPreviewOrPrinted.html 正常に印刷出来たのか？の確認も必要かもしれません。 （紙詰まりとかトナーが無いとか・・）

Simanohito
質問者

お礼

ご回答ありがとうございます。 上記URLで確認しましたが、プレビューした内容に問題が無く『ファイル』→『印刷』と操作した時のイベントを取得することができませんでした。 何か上記URLの方法以外でしないといけないことがあるのでしょうか？

  1. カテゴリ
  2. [技術者向] コンピューター
  3. プログラミング・開発
  4. その他（プログラミング・開発）

関連するQ&A

  • ACCESSの印刷ダイアログについて

    いつも大変お世話になっております。 レポートをFILTER(県名)で抽出した状態でプレビューしたいと思い以下のようにPGを組みました。 DoCmd.OpenReport "レポートR", acViewPreview Reports!レポートR.Filter = "[県名] Like '*" & txtbox_県名1 & "*'" Reports!レポートR.FilterOn = True プレビューはうまくいきましたが、この抽出した状態で印刷したいのですがどうすればいいのでしょうか。また、印刷の前に印刷ダイアログをだしたいと思い、 DoCmd.SelectObject acReport, "レポートR", False DoCmd.RunCommand acCmdPrint と組んだのですが全件印刷されてしまいます。 ご教授宜しくお願いします。

  • Accessのレポート印刷について教えて下さい。

    Accessのフォームでフィルタを使い絞り込んだデータをレポートで 印刷する場合について教えて下さい。 DoCmd.OpenReport "レポート名", acViewPreview, , Me.Filter では、フォームとレポートが同じレコードソースだと使えるという事ですが、 フォームとレポートのレコードソースが別の場合はどのようにすると フィルタで絞り込んだ条件のレポートを印刷できますか？ 教えて下さい。よろしくお願いします。

  • VB6からアクセスのレポートをプレビューするには？

    おはようございます。またまた躓いたのでお助け下さい<(_ _)>VB6で、アクセス2000にパーツ名を読み書きしています。アクセスの方でレポートを作ってあるのですが、印刷はいけそうなのですが、これを印刷前にプレビューしたいのですが、 Set accApp = CreateObject("Access.Application") accApp.OpenCurrentDatabase "C:\part-name.mdb" accApp.DoCmd.OpenReport "パーツ情報", acViewNormal 印刷について参考にさせていただいたソースです。DoCmd.OpenReport が印刷ですよね？ここを変更するのでしょうか？よろしくお願いします<(_ _)>

  • access2003フォームの指定表示のみ印刷プレビューしたいのですが・・・？

    　Access2003初心者なので詳しく教えていただきたいのです。 　フォームで詳細に「請求月」とあり、コンボボックスでフィルターを 　かける様にしています。 　（請求月（H20.5月と書式設定）している） 　フォーム上では、ちゃんとフィルターがかかり 　指定データだけが詳細に表記しているのです。 　フォーム上に「印刷ボタン」を作りイベントでクリックしたら 　フォームの情報のみレポートプレビューしたいのですが 　レポートに移動するとすべて表示されるのです。 　指定したレコードだけレポートに表示したいのですが 　どうしたらよいのでしょうか？ 　Private Sub BTN_印刷_Click() DoCmd.OpenReport "RPT_●●請求済", acViewPreview End Sub 　上記ステートメントまではわかるのですが・・・？ 　申し訳ないのです、よい方法を教えていただけませんか。 　説明不足かもしれませんがよろしくお願いいたします。

  • VBからACCESSのレポートをプレビューで表示

    お世話になっております。 VBからのMDBの帳票印刷の事で悩んでおります。 データベースとしてMDBを使用しているので、MDBのレポートのプレビュー を表示しようとしました所、下記のコードで実現することができました。 Dim oleAccess As Access.Application Set oleAccess = GetObject(App.Path & "\data.mdb") Call oleAccess.DoCmd.OpenReport(ReportName, acPreview) oleAccess.DoCmd.Maximize oleAccess.Visible = True 開発環境では問題なくプレビューの表示ができたのですが、 このプログラムを、ACCESSの入っていない環境で、ACCESSランタイムをインストール して実行すると、印刷時に「エラー429 ActiveXコンポーネントはオブジェクトを作成 できません」とのエラーが出て、印刷だけができません（その他の動作は正常です）。 エラー内容から、ACCESSオブジェクトの作成に失敗していると思うのですが、 Access.Application型を使わずに、ACCESSのプレビュー・印刷をする方法は無いのでし ょうか？（たとえば、DAO.DataBase型でMDBを開いて印刷する方法など・・・） 以前にも同じような質問をさせて頂いたのですが、私の力不足のため、再度ご質問させて頂きます。 どんな事でもいいので、アドバイスを頂ければ幸いです。 よろしくお願い致します。

  • ACCESSのレポートについて

    ACCESSでフォームから印刷ボタンを押すとレポートの印刷プレビューが表示されるという簡単なアプリケーションを作成したんですが、レポートの余白・向きを保存→アクセスを終了→アクセスを起動→レポートを表示→レポートを閉じる→レポートを表示という操作をすると、ページ設定で設定し保存した余白・ページの向きが元に戻ってしまいます。どうすればちゃんと保存できるのでしょうか？ ちなみにDoCmd.OpenReport "hoge", acViewPreviewでレポートを表示させてます。

  • Accessのレポート印刷について

    Access2007を使用しています。 DoCmd.OpenReport "レポート名", acViewNormal, , Me.Filter で絞り込みをした内容のレポートで1枚目だけが印刷されるようにしたいのですが、 どうしたら良いですか？ 2枚目・3枚目は印刷したくないので、1枚目だけが印刷されるようにしたいです。 よろしくお願いします。

  • ＶＢ6からACCESSのレポートを印刷　　

    OpenReportはレポート1 text2.text はテキスト型（何部印刷） oleAccess.DoCmd.OpenReport ReportName, acNormal oleAccess.DoCmd.PrintOut acPages, , , , CInt(Text2.Text) 上記の内容では印刷したときに、印刷ドキュメントがOpenReportとPrintOutでは違うんですけど,これでは 別々のデータが印刷さるのでこまってます。どうかいいアドバイスを下さい. 例　　ACCESSのテーブル 　　　テーブル1（青くなっている状態） 　　　テーブル2 　　　ACCESSのレポート 　　　レポート1（青くなっている状態） っていう具合になっていて、ACCESSを開くとテーブル1にカ ーソルがある状態。 印刷のドキュメント レポート1 テーブル1 っいうふうになっていて、困っています. レポート1だけを何部印刷するとかはできないんですかね？

  • Access2007での印刷プレビュー

    Access2007を使用しておりますが、レポートの印刷プレビュー画面が 表示されません。 作成したレポートのプロパティでは、既定のビューを印刷プレビューに してあります。 すべてのAccsessオブジェクト内にあるレポートを直接開くときには、 印刷プレビューで表示されるのですが、"Switchboard"を用いてその レポートを開こうとすると、レポートビューになってしまいます。 いろいろ試したのですが、印刷プレビューが表示されずお手上げ状態です。 お手数ですがご教授ください。

  • access2000で作成したVisual Basicがaccess2007で使えないのはなぜ？

    教えてください。 access2000で作成したVisual Basicがaccess2007で使えないのです。 フォームにボタンを設定し、(1)(2)ボタンをクリックすればイベントを行う機能にしました。 (1)検索 　DoCmd.OpenReport "レポート名", acViewPreview, "フィールド名" (2)印刷 　DoCmd.OpenReport "レポート名", acViewNormal, "フィールド名" もちろんセキュリティオプションでコンテンツを有効にしています。 なぜか、関連付けされていないオブジェクトにフォームが入っています。 2000ではできるのに、なぜか2007ではできません。 どうしてでしょうか。教えていください。

注目のQ&A

カテゴリ

専門家に質問してみよう

職業から探して質問する

あなたにピッタリな商品が見つかる！ OKWAVEセレクト

質問する