Microsoft Access Club Access超初心者対象Forum Access初級者対象Forum Access初・中級者対象Forum Access VBA Tips Forum DAO、ADO、SQL Forum

     

リストへもどる

投稿記事の一括表示

タイトルフォームでの抽出について
記事No172079
投稿日: 2017/12/04(Mon) 19:35
投稿者
OS:10
Access Version:2017

コンボボックスで選択して抽出をし、次に同じコンボボックスで違うものを
選択して抽出しようとしても最初の抽出結果のままです。
一旦、クエリを消してやるときちんと抽出してくれます。

このようなときはどんな処理をしておけばいいのでしょうか。
超初心者ですので分かりやすくお願いいたします。
ご迷惑をおかけしますがよろしくお願いいたします。

タイトルRe: フォームでの抽出について
記事No172080
投稿日: 2017/12/05(Tue) 10:44
投稿者ナバ
こんにちは。

こちらの続きですかね。
http://www.accessclub.jp/bbs/wforum2.cgi?mode=allread&no=83179&page=0

> コンボボックスで選択して抽出をし、次に同じコンボボックスで違うものを
> 選択して抽出しようとしても最初の抽出結果のままです。
> 一旦、クエリを消してやるときちんと抽出してくれます。

まずはイベントが思ったように発生しているかを
確認しましょう。

Me![商品].Requery

の前の行に

Msgbox "a"

と書いてメッセージボックスを表示させてみてください。

タイトルRe^2: フォームでの抽出について
記事No172084
投稿日: 2017/12/07(Thu) 10:26
投稿者
毎回、ありがとうございます。遅くなりまして申し訳ございません。

やってみましたら下記のメッセージが出ました。

"a"





> こんにちは。
>
> こちらの続きですかね。
> http://www.accessclub.jp/bbs/wforum2.cgi?mode=allread&no=83179&page=0
>
> > コンボボックスで選択して抽出をし、次に同じコンボボックスで違うものを
> > 選択して抽出しようとしても最初の抽出結果のままです。
> > 一旦、クエリを消してやるときちんと抽出してくれます。
>
> まずはイベントが思ったように発生しているかを
> 確認しましょう。
>
> Me![商品].Requery
>
> の前の行に
>
> Msgbox "a"
>
> と書いてメッセージボックスを表示させてみてください。

タイトルRe^3: フォームでの抽出について
記事No172085
投稿日: 2017/12/07(Thu) 10:50
投稿者ナバ
> やってみましたら下記のメッセージが出ました。
>
> "a"

1回目の検索、2回目の検索、どちらの場合も
メッセージが表示されたということですね?

タイトルRe^4: フォームでの抽出について
記事No172086
投稿日: 2017/12/08(Fri) 09:41
投稿者
やり直したら"a"が出なくなりました。??

コンボボックスの更新後処理に

Msgbox"a"

Me![顧客名].Requery

と、入力しただけですが。

タイトルRe^5: フォームでの抽出について
記事No172087
投稿日: 2017/12/08(Fri) 10:53
投稿者ナバ
> やり直したら"a"が出なくなりました。??
落ち着いて、Accessを開きなおしてから、

1回目 どうだった

2回目 どうだった

を教えてください。

タイトルRe^6: フォームでの抽出について
記事No172088
投稿日: 2017/12/08(Fri) 11:34
投稿者
"a"は表示されないのですが、

1回目 きちんとコンボボックスの値で抽出されます

2回目 コンボボックスの値を変えても1回目と同じ抽出です。





> > やり直したら"a"が出なくなりました。??
> 落ち着いて、Accessを開きなおしてから、
>
> 1回目 どうだった
>
> 2回目 どうだった
>
> を教えてください。

タイトルRe^7: フォームでの抽出について
記事No172089
投稿日: 2017/12/08(Fri) 11:40
投稿者ナバ
1回目、2回目ともに"a"が表示されましたか。
それとも1回目だけですか。

タイトルRe^8: フォームでの抽出について
記事No172090
投稿日: 2017/12/08(Fri) 12:06
投稿者
いえ、両方共に"a"は表示されません。


> 1回目、2回目ともに"a"が表示されましたか。
> それとも1回目だけですか。

タイトルRe^9: フォームでの抽出について
記事No172091
投稿日: 2017/12/08(Fri) 13:07
投稿者ナバ
Msgbox"a"
は残っていますか?

タイトルRe^10: フォームでの抽出について
記事No172092
投稿日: 2017/12/08(Fri) 13:33
投稿者
これで合ってますよね?

Private Sub 顧客名_AfterUpdate()

MsgBox "a"
Me![顧客名].Requery
End Sub






> Msgbox"a"
> は残っていますか?

タイトルRe^11: フォームでの抽出について
記事No172093
投稿日: 2017/12/08(Fri) 14:04
投稿者ナバ
はい、これでいいですね。

なぜ今は出ないのか、不思議です。

メッセージが出ていた時からなにか変えましたか?

タイトルRe^12: フォームでの抽出について
記事No172094
投稿日: 2017/12/08(Fri) 15:36
投稿者
いえ、作り方がまずいのかなと思って作り直してみました。
そしたら出なくなりました。
でも前回のものをリセットしてくれないのですよね。



> はい、これでいいですね。
>
> なぜ今は出ないのか、不思議です。
>
> メッセージが出ていた時からなにか変えましたか?

タイトルRe^13: フォームでの抽出について
記事No172095
投稿日: 2017/12/08(Fri) 15:45
投稿者ナバ
> いえ、作り方がまずいのかなと思って作り直してみました。
> そしたら出なくなりました。
> でも前回のものをリセットしてくれないのですよね。

「リセット」とは、何に対するどういった状態のことを指しているのか分かりませんが、
前回の質問の際に提示した手順をもう一度やってみてください、
としか今はお答えできません。

タイトルRe^14: フォームでの抽出について
記事No172096
投稿日: 2017/12/08(Fri) 16:17
投稿者
言葉が変で申し訳ありません。
リセットというか2回目の抽出時に1回目の抽出結果のままなので、1回目をリセットできないかという意味でした。
もう一回、作り直してみます。


> > いえ、作り方がまずいのかなと思って作り直してみました。
> > そしたら出なくなりました。
> > でも前回のものをリセットしてくれないのですよね。
>
> 「リセット」とは、何に対するどういった状態のことを指しているのか分かりませんが、
> 前回の質問の際に提示した手順をもう一度やってみてください、
> としか今はお答えできません。

- 以下のフォームから自分の投稿記事を修正・削除することができます -
処理 記事No パスワード

ページの先頭へ 前ページへ戻る