ACCESS コンボの抽出の再選択時の設定

質問

すみません、教えてください。

ＡＣＣＥＳＳの入力フォームで
非連結コンボＡ　…　企業名
連結コンボＢ　…　支店名
をつくり、Ａで選んだ企業名によりＢの選択肢にフィルターをかけています。

一度選んだ後に再度Ａを変える際に
Private Sub コンボ77_AfterUpdate()

Me!支店名.Requery

End Sub
を入れて再度フィルタをかけなおせるようにしていますが、これを変更してしまうと該当のレコード以外のレコードの企業名も変わってしまいます。
表示されているレコードのみRequeryを有効にすることは出来ませんでしょうか？

よろしくお願いいたします。

回答No.2

CHRONOS_0 · ベストアンサー

帳票フォームですね

帳票フォームは複数のレコードを表示していますが
使われているコントロールは同じものです
従ってカレントレコードの都合のいいようにコントロールを変えてしまうと
カレント以外のレコードの表示がおかしくなってしまいます

これに対処するには表示用と入力用のコントロールを
分けてやらなければなりません
しかしひとつのフィールドに対してコントロールが2つでは
分かりにくいものになってしまいますから

入力用コントロール(絞込をするコンボ)の上に
表示用のコントロール(絞込をしないコンボ)を重ね
表示用にエンターしたときに入力用にフォーカスを移動してやる
というような仕掛けを作ります

Private Sub 表示用コンボ_Enter()
Me.入力用コンボ.SetFocus
End Sub

Private Sub 入力用コンボ_Enter()
Me.入力用コンボ.Requery
End Sub

補足

ご回答ありがとうございます。
上記のようにしてみたところ、コンボにターゲットが合わなくなってしまいました。
片方は変えられるのですが、もう片方は変更が出来なくなります。
これでは、絞込み自体が出来なくなってしまうのですが、なにか良い方法はありませんでしょうか？

回答No.5

CHRONOS_0

1回目の回答をよく読んでいただきましたか?

オペレーターには一つしか見えないように2つを重ねておいて
入力時に入れ替えるようにするのですよ

回答No.4

CHRONOS_0

>コンボＡ＝非連結
これはこのままでいいです

コンボBを2つにします
コンボB表示用　連結：絞込なし
コンボB入力用　連結:絞込あり

コンボB入力用の絞込実行はコンボA変更時でなく
コンボBフォーカス取得時に行なっています
(変更時でもいいですが、その必要がないため)

補足

ありがとうございます。
２つにすると、正しいものが表示されることは知っているので、使ったりしています。

ただ、これだとＡＣＣＥＳＳをよくしらない入力者に「なんで？」と聞かれることが多いので、２つ表示しない方法を探しています。
実質無理なのでしょうか？

回答No.3

CHRONOS_0

>コンボにターゲットが合わなくなってしまいました。
どういうことでしょう
どちらのコンボも連結コントロールにするのですよ

絞込をしない方から入力出来ないという意味なら
その必要はないはずですよね

>絞込み自体が出来なくなってしまうのですが
絞込はどのようにしているのでしょう
コンボのソースをくえりにしているのじゃないのですか

VBAで絞込をしているのならソースをクエリに変えてください

補足

えっと、絞込み大前提なのですが…

コンボＡ＝非連結　　…こちらを一つ選ぶとコンボＢにフィルタがかかる

コンボＢ＝連結　…[forms]![入力フォーム]![コンボＡ]がＳＱＬステートメント：クエリビルダ　に入っている。

１、Ａを選ぶとＢの選択肢が変わる。←クエリ
２、Ａを選びなおすとＢも選びなおされる。←ＶＢＡ

コレが基本です。ＡもＢも使えないと意味がないのです。
この状態で、２の作業をしたときに、過去のレコードのフォーム上でも再選択のために変わってしまうので、変わらないようにしたいというのが質問事項です。

コンボを連結にすると、うまくフィルタがかからないので、非連結にしてあります。
連結にする場合のフィルタの掛け方を教えてください。

回答No.1

miwaharu

こんにちは、違ったらすみません
それは、該当レコード以外が変わるのではなくて、
リクエリーした、（コンボＡを変更した）レコードの
内容に変わるからではないでしょうか。
これを解消するには、レコード移動時のイベントに
Me!支店名.Requery
を記載して、レコードを移動するたびに
リクエリーする必要があると思います

補足

ご回答ありがとうございます。
＞該当レコード以外が変わる
のではなく、該当レコードを含めた全てが変わってしまうんです。
実際にテーブルを確認して保存されているデータは正しいものですが、フォーム上で見え方が変わってしまうのはちょっと気持ち悪いので。。。

上記の方法もやってみましたが、現状変わらず、でした。