Microsoft Access 掲示板

Microsoft Access 掲示板

実行時エラー2501が出る。 / 1

10 コメント
views
6 フォロー
1
hatena 2025/04/24 (木) 10:59:16

DoCmd.OpenReport でレポートを開くのに失敗するので実行時エラーが発生します。そういう仕様です。
エラー処理を追加しましょう。
メッセージも何も出さないのなら、

Private Sub btn_1_Click()
    On Error Resume Next
    DoCmd.OpenReport "R_Report", acViewPreview
    On Error GoTo 0
End Sub
通報 ...
  • 2
    ACDC包囲網 2025/04/24 (木) 11:01:43 修正 1e61d@44ebd >> 1

    ボタンにこのコードを書く場合、レポートの空データ時イベントは不要ですか？
    また、複数のレポートを開く場合、レポートの数だけこのエラー処理を書く必要がありますか？下記のような書き方をする必要がありますか？

    Private Sub btn_1_Click()

    On Error Resume Next
    DoCmd.OpenReport "R_Report1", acViewPreview
    On Error GoTo 0

    On Error Resume Next
    DoCmd.OpenReport "R_Report2", acViewPreview
    On Error GoTo 0

    On Error Resume Next
    DoCmd.OpenReport "R_Report3", acViewPreview
    On Error GoTo 0
End Sub