【access】＃nameエラーについて教えてください。

Question

フォームに設定したテキストボックスが＃nameエラーになります。
必ずエラーが起こるかというそうではなく、どうやらあるチェックボックスを触るとエラーになるようです。

そのチェックボックスというのは、メインフォームには社員が表示されているのですが退職社員含む全社員表示するのか
今いる社員だけ表示するのかどうかを判定するチェックボックスです。(チェックが外れていると今の社員だけ)

そのチェックボックスにチェックを入れたり、外したりするとそれまで表示されていたテキストボックスが＃nameエラーに変わってしまいます。

ちなみにチェックボックスの更新後処理は
Private Sub チェック64_AfterUpdate()

If Me!チェック64 = True Then
Me.RecordSource = "社員ﾏｽﾀ"
Else
Me.RecordSource = "社員ﾏｽﾀ クエリ"
End If

End Sub

になります。

表示したいテキストボックスのコントロールソースは社員ﾏｽﾀではなく、違うテーブルから引っ張っています。

情報不足でしたら教えてください。
原因解明のご協力をお願いします。

Comments

[mdj]

#nameになる条件でデバッグしてください。コントロールソースが変わったか、存在しないか、何か起きていますよね

[hatena19]

> 表示したいテキストボックスのコントロールソースは社員ﾏｽﾀではなく、違うテーブルから引っ張っています。

どのように引っ張ってきていますか。そのコントロールソースの設定を提示してください。

[jennieruby]

mdj様
チェックボックスのVBAは作動するのでここは問題ないと思います・・・
テキストボックスはVBAなど何もしていないのですがデバッグはどう行うのでしょうか？

[jennieruby]

hatena19様
既存のフィールドの追加→利用可能なフィールド→入れたいフィールドをダブルクリックでテキストボックスを設定しています・・・

Answer 1

表示したいテキストボックスのコントロールソースは社員ﾏｽﾀではなく、違うテーブルから引っ張っています。

既存のフィールドの追加→利用可能なフィールド→入れたいフィールドをダブルクリックでテキストボックスを設定しています・・・

チェック64_AfterUpdate でレコードソースを書き換えているので、
フォームデザイン時のには存在したフィールドが書き換えたレコードソースに存在していないのでしょう。

"社員ﾏｽﾀ" 以外のテーブルのフィールドを参照しているなら、 そのテーブルと"社員ﾏｽﾀ"を含むクエリを作成してそれをレコードソースにするようにしましょう。

Comments

[jennieruby]

クエリを作成し、それをレコードソースとしたら表示されました！
しかし、ある特定のテキストボックスだけ＃Nameエラーが出ます・・・
テキストボックスのフィールドはしっかりクエリに入っているのになんででしょうか(-_-;)

そして、クエリをレコードソースにするとメニューからメインフォームを開いたとき表示されていたはずのテキストボックスが＃nameとなり、チェックボックスにチェックを入れたりすると通常に戻ります。。
色々とバグのようなものが出ているので困っています(´;ω;｀)

[hatena19]

＃name エラーは設定してるフィールドなりコントロールが見つからないということなので、どこかでそうなるような処理をしているはずです。
ちゃんと参照しているものが存在しているのに＃name エラーとなるというのは聞いたことがないです。

[jennieruby]

回答ありがとうございます。
色々と触ってみると少しは改善したのですが、やはりあるテキストボックスだけは＃nameエラーのままです・・・
チェックボックスを外すと表示されているのに、チェックを入れると＃nameエラーになります・・・
原因はきっとチェックボックスにあるとおもうのですが。。。
コードをPrivate Sub チェック64_AfterUpdate()

If Me!チェック64 = True Then
Me.RecordSource = "社員ﾏｽﾀ"
Else
Me.RecordSource = "クエリ１"　←作り直したクエリ
End If
に変えてみてもうまくいきません・・・

やはり改善は困難でしょうか(´;ω;｀)
End Sub

[hatena19]

＃nameエラー になるのは、
Me.RecordSource = "社員ﾏｽﾀ" のときですか、それとも、
Me.RecordSource = "クエリ１" のときですか。

[jennieruby]

Me.RecordSource = "社員ﾏｽﾀ"
のときエラーになってしまいます・・・

[hatena19]

「社員マスター」に＃nameエラーが出るコントロールのコントロールソースに設定してあるフィールドはありますか。

[jennieruby]

社員ﾏｽﾀにはありませんが、テーブルAにエラーが出るコントロールのフィールドがあります。
社員ﾏｽﾀとテーブルAはリレーションシップで結んでおり、2つのクエリをフォームのレコードソースとしています。

上のコードでMe.RecordSource = "クエリ１"に変更したと書きましたがこれに変更してしまうと、チェックボックスでの抽出がうまくいきませんでした・・・。

[hatena19]

レコードソースを「社員ﾏｽﾀ」に変更したら、そこにないフィールドは参照できませんので、当然、＃nameエラーになります。そこことを何度も言葉を変えて説明してきたつもりですが、伝わってなかったのでしょうか。

結局、なんのためにレコードソースを書き換えているのでしょうか。

[jennieruby]

お手数をおかけしました。
最後までお付き合いいただきありがとうございました。

[hatena19]

もし、レコードソースを書き換える目的が抽出（フィールターをかける）ということなら、レコードソースを書き換えるのではなく、Filterプロパティを設定するという方針に変更しましょう。そうすればこのようなトラブルは発生しません。

Filterの使い方｜FilterOn｜複数条件の設定方法｜日付抽出｜解除方法 - Access VBA入門
https://www.feedsoft.net/access/guide-vba/guide18.html