レポートが開けない

このQ&Aのポイント
  • 作成済みのレポートを開く際にエラーが発生し、イベントプロパティに指定した式「開く時」に問題があるようです。
  • 新しく取り込んだファイルから抽出条件を変えて2種類のデータを作成しているが、これが問題の原因となっている可能性もある。
  • DoCmd.OpenReportからエラーが発生し、レポートを開く処理に問題があるようです。
回答を見る
  • ベストアンサー

レポートが開けない。

作成済みのレポートうまく開くことが出来ません。 エラーの内容としては、 イベントプロパティに指定した式:開く時でエラーが発生しました。 指定した式にあいまいな名前が含まれています。 といった表示が出ます。 特にレポートを修正したことは無いのですが、 システムに取り込むファイルを1つ追加しました。 それと、新しく取り込んだファイルから抽出条件を変えて 2種類のデータを作成しているのですが、これが問題ありですか? もっと違うことでしょうか? レポートを開く処理までは、何のエラーにもなりません。 DoCmd.OpenReportからエラーに飛んでしまいます。 何かご教示いただけると助かります。 よろしくお願いします。 レポートを開く時のコード↓ If MsgBox("はい :印刷" & vbCr & "いいえ:プレビュー", vbYesNo + vbInformation, "出力処理メニュー", "", 0) = vbYes Then DoCmd.OpenReport "R_帳票一覧", acViewNormal Else DoCmd.OpenReport "R_帳票一覧", acViewPreview End If '処理終了メッセージ MsgBox "処理が正常に終了しました。", vbInformation, " " 帳票一覧作成 = True On Error GoTo 0 Exit Function Err: 帳票一覧作成 = False MsgBox Err.Description イベントプロパティに指定してある式↓ 開く時:=Report_Maximize()

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

  • ベストアンサー
回答No.2

No.1さんと同じです。  「R_帳票一覧」のプロパティのレコードソースにクエリーが指定してあるはずです。 そのクエリーを単独で開くと同じエラーメッセージが出るはずです。

その他の回答 (1)

  • nda23
  • ベストアンサー率54% (777/1415)
回答No.1

これAccessですか?バージョンを記述してくださいね。 推測ですが、レポートの元になっているクエリにエラーがあると思います。 「あいまい」というメッセージが出るのは複数のテーブルを結合したクエリで、 ユニークでない(複数のテーブルに同名のものがある)フィールドを参照したためでしょう。

関連するQ&A

  • accessレポートの抽出条件

    こんにちわ。 いまaccess2000で, フォームからレポートを出力する処理をしています。 そのレポートは[コントロールソース]としてあるクエリを設定しています。 そこで, DoCmd.OpenReport "r_帳票", acPreview, , "[番号] = 'a100'" とコーディングしました。 なおレポートの[フィルタ]プロパティは"はい"にしています。 ところが,出力されたレポートには条件で抽出されずに 全件が出力されてしまいました。 抽出条件を効かせるためにはどうすれば良いでしょうか? 教えてください。お願いします。

  • アクセスについてです(レポート)

    フォームからレポートを開く時に、 VBAでコントロールにコントロールソースを指定したいのですが どうやらエラーになってしまうようです。 フォームからではなく手動でレポートを開く場合は エラーにはなりません。 レポートのレコードソースは、T_testを指定していて、 その上にあるコントロールは非連結で指定したコントロールソースをvbaで入れたいです。 なので、レポートのLoadイベントで Private Sub Report_Load() Me.テキスト0.ControlSource = "8月" End Sub として、手動でレポートを開く分には問題ないのですが このコードのまま、フォームから Private Sub コマンド0_Click() DoCmd.OpenReport "レポート1", acViewPreview End Sub とすると、Me.テキスト0.ControlSource = "8月"で、 実行時エラー2191 印刷プレビュー時または印刷を開始した後は コントロールソースプロパティを設定できません。 のエラーが発生します。 フォームから Private Sub コマンド0_Click() DoCmd.OpenReport "レポート1", acViewDesign End Sub とすると、レポートのLoadイベントが発生しませんでした。 ご回答よろしくお願いします。

  • レポートで空データ時に印刷しない

    教えてください。 VBA「Private Sub コマンドボタン_Click()」で 「Docmd.OpenReport "レポート名"」の1文があるのですが、レポートプロパティで空データの時は印刷しないようなマクロ「全マクロの中止」を組んであります。 確かに、空データ時は中止がかかり印刷はされないのですが、実行時エラー2001 直前の操作はキャンセルされました。とエラーメッセージが帰ってきます。デバックをクリックすると、「Docmd.OpenReport "レポート名"」の一文が黄色くなっています。 どうしたら、綺麗に処理を終了する事ができるのでしょうか?教えてください。

  • レポート印刷時のエラー

    いつもお世話になっております。 下記のコードで、レポート印刷時にプリンタダイアログを表示させて、保存するファイル名を「仕分け作業登録リスト_AWB」にしたいと思いますが、下記のエラーがでてしまいます。 ※AWBはR-Sorting NoteのAWBの値を持ってきたいです。 エラー内容 予期せぬエラーが発生しました。 エラーナンバー:3265 エラー内容:要求された名前、または序数に対応する項目がコレクションで見つかりません。 エラー3265についてネットで調べてみましたが、自分ではわからないので、 対処方法を教えていただければと思います。 ※コードも独学なのできれいでなくてすみません。 Private Sub Cmd_Report_Click() On Error GoTo Err_Cmd_Report_Click Dim rs As ADODB.Recordset Set rs = New ADODB.Recordset '指定したレポートを印刷プレビューで開く Dim strReportName1 As String strReportName1 = "R_Sorting Note" pdfName = "仕分け作業登録リスト_" & rs!AWB DoCmd.OpenReport strReportName1, acViewPreview DoCmd.OutputTo acOutputReport, strReportName1, acFromatPDF, pdfName, True DoCmd.RunCommand acCmdPrint 'ダイアログの表示 'プレビューを閉じる DoCmd.Close acReport, strReportName1 Exit_Cmd_Report_Click: 'プレビューを閉じる DoCmd.Close acReport, strReportName1 Exit Sub Err_Cmd_Report_Click: If Err.Number = 2501 Then 'エラーを無視する Resume Exit_Cmd_Report_Click Else MsgBox "予期せぬエラーが発生しました" & Chr(13) & _ "エラーナンバー:" & Err.Number & Chr(13) & _ "エラー内容:" & Err.Description, vbOKOnly End If Resume Exit_Cmd_Report_Click End Sub

  • アクセスのレポートの印刷について。

    アクセスで報告書を作成し、印刷する時に、ウィザードを使って作ったコマンドボタン「報告書の印刷」を使用したいのですが、全てのレコードが印刷されます。以下の記述でどこを変更すればよいか教えてください。 また、基本的な質問なのですが、レポートのプレビュー上にコマンドボタンを配置することは可能でしょうか?(やはり、無理でしょうか?) よろしくお願いいたします。 Private Sub 報告書の印刷_Click() On Error GoTo Err_報告書の印刷_Click Dim stDocName As String stDocName = ChrW(22577) & ChrW(21578) & ChrW(26360) DoCmd.OpenReport stDocName, acNormal Exit_報告書の印刷_Click: Exit Sub Err_報告書の印刷_Click: MsgBox Err.Description Resume Exit_報告書の印刷_Click End Sub

  • Access2000でリスト指定の印刷

    現在Access2000で顧客管理のデータベースを作成しています。 指定したレコードだけを印刷する、指定レコード印刷フォームを作成しようと思い、フォームにリストボックスを貼り付け、そのフォームに印刷ボタンを作成しました。 その、印刷ボタンのプロパティ(クリック時)のイベント設定は、次のように設定したのですが、うまく動きません。 Private Sub 印刷ボタン_Click() On Error GoTo Err_印刷ボタン_Click Dim stDocName As String Me.Visible = False stDocName = "kokyaku_report" DoCmd.OpenReport stDocName, acNormal, , "id = " & id Exit_印刷ボタン_Click: Exit Sub Err_印刷ボタン_Click: MsgBox Err.Description Resume Exit_印刷ボタン_Click End Sub ちなみに、テーブルの主キーは「id」としております。 申し訳ありませんが、お分かりの方がいらっしゃったら宜しくお願い致します。

  • Accessのレポートが開けません。

    いつもお世話になっております。 使用環境:Windows20000、Access2003 表題の件ですが、Accessのレポートを作成し、 メニュー画面フォームからボタンでそのレポートを 開きたいのですがなぜか開きません。 ボタンを押しても画面が真っ白になって砂時計になり、 暫くするとエラーも出ずにメニュー画面に戻ってしまうのです。 以下、ボタンが押された時のソースです。(この1行だけ) DoCmd.OpenReport "Aレポート", acViewPreview 普通にレポートをダブルクリックするとプレビューが 正常に表示されます。 一体何が原因なのでしょうか。何かエラーが出れば対処の しようもあるのですが。 どなたか心当たりのある方おられませんでしょうか。 宜しくお願い致します。

  • ACCESS でフォームフィルターをレポートに引き継ぐ方法

    こんにちは。 いつもありがとうございます。 現在、ACCESSで名簿管理ソフトを作っています。 フォームで条件を指定し、該当する人を抽出できるようになっているのですが、その条件をそのままレポートのソースに使用するにはどうれすばいいでしょうか? DoCmd.OpenReport "rpt_名簿", acViewPreview,, Me.Filter としているのですが、実行時エラー 438が出てしまいます。

  • Accessでレポートの項目をVBAで変更したい

    Accessのレポートで年次集計を項目が可変になるため、VBAで書き換えるようにしたのですが、うまく出来ません。 お心当たりのかたいらっしゃいましたら教えて頂けないでしょうか。 フォームの概要(売上集計)     OO年 OO年 OO年 商品A 1,000 2,000 3,000  商品B 1,500 2,500 3,500 商品C 2,500 3,500 4,500 ※年は可変です 次のようにするとフォームが開いていないと言ったエラーが出ます。 stDocName = "年別売上集計レポート" Reports(stDocName).ラベル1.Caption = cstr(Year) + "年" DoCmd.OpenReport stDocName, acPreview, "", [フィルタ] 又次のようにするとエラーは出ませんが、ラベルは書き換わりません。 stDocName = "年別売上集計レポート" DoCmd.OpenReport stDocName, acHidden, "", [フィルタ] Reports(stDocName).ラベル1.Caption = cstr(Year) + "年" DoCmd.OpenReport stDocName, acPreview, "", [フィルタ]

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

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