ここから本文です

お世話になります。 Access VBA についてご教示ください。

アバター

ID非公開さん

2018/4/1123:00:38

お世話になります。
Access VBA についてご教示ください。

帳票形式のフォームにて削除した次のレコードに飛ぶコードを
作成しましたが、
「実行時エラー2465 指定した式で参照されている'|1'フィールドが見つかりません。」
が表示されます。

以下プログラムの↓で落ちて上記エラーが表示されます。
frm2.Recordset.FindFirst "KikanNo=" & Kikan


コードは一部抜粋した形になります。

Function aaa() as Boolean

Dim Kikan As Integer
Dim frm2 As Object

Kikan=100

Set frm2 = Forms![親画面].[サブフォーム].[子画面]
frm2.Recordset.FindFirst "KikanNo=" & Kikan

End Function

どうぞご教示ください。
よろしくお願いいたします。

閲覧数:
27
回答数:
1
お礼:
100枚

違反報告

ベストアンサーに選ばれた回答

プロフィール画像

カテゴリマスター

hat********さん

2018/4/1123:10:08

Forms![親画面].[サブフォーム].[子画面]
の部分がおかしいですね。

「親画面」フォームに、サブフォームとして「子画面」フォームが埋め込まれているということですか。

だとしたら、

Set Set frm2 = Forms![親画面]![子画面].Form

としなければなりません。ちなみに[子画面]の部分は、サブフォームコントロール名にする必用があります。

サブフォームとサブフォームコントロールの違いとは? - hatena chips
https://hatenachips.blog.fc2.com/blog-entry-347.html

  • アバター

    質問者

    ID非公開さん

    2018/4/1323:54:29

    hat********様

    お世話になります。
    教えていただきましたコードで出来ました。
    ありがとうございます。
    サブフォームの扱いを理解していたつもりでしたが全く理解
    できていなかったことが分かりました。
    リンクいただいたURLを拝見させていただき再度勉強させていただきたいとお思います。
    いつもご親切にありがとうございます。
    改めましてありがとうございました。

返信を取り消しますが
よろしいですか?

  • 取り消す
  • キャンセル

みんなで作る知恵袋 悩みや疑問、なんでも気軽にきいちゃおう!

Q&Aをキーワードで検索:

Yahoo! JAPANは、回答に記載された内容の信ぴょう性、正確性を保証しておりません。
お客様自身の責任と判断で、ご利用ください。
本文はここまでです このページの先頭へ

「追加する」ボタンを押してください。

閉じる

※知恵コレクションに追加された質問は選択されたID/ニックネームのMy知恵袋で確認できます。

不適切な投稿でないことを報告しました。

閉じる