![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?e8efa67)
Filterで抽出した複数のデーターの詳細をそのデーターの順で連続して表示したいのでご指導ください。
F_物件検索 (メインフォーム)
F_検索結果 (サブフォーム用)
sub検索結果 (サブフォーム)
F_店頭用 (詳細表示用)
抽出された最初のデーターの詳細を表示する場合は下記の通りで問題なく動作します。
Private Sub cmd物件詳細_Click()
DoCmd.OpenForm "F_店頭用", acNormal, , "物件番号 = " & Me!sub検索結果.Form!物件番号, acFormReadOnly
End Sub
上記で表示されたF_店頭用の詳細画面に【次へ】のボタンをAccessのマクロで設定しても、表示されるデーターは抽出されたものではなく、テーブルのデーター順に表示されます。
そこで、OpenFormコマンド、他で何とかならないものでしょうか?
下記ではエラーがでます。
Private Sub cmd連続詳細_Click()
DoCmd.OpenForm "F_店頭用", , Me!sub検索結果, acFormReadOnly
End Sub
尚、全てのデーターは下記にあります。
www.ky-housing.jp/oshiete-goo/q-2.accdb
No.4ベストアンサー
- 回答日時:
>VBAのプログラムだけで抽出しているため、
>詳細表示のフォームにAccessのNEXTボタンを付けた場合、
>抽出したデーターではなく、
>テーブルのデーターをそのまま順次表示してしまいます。
やっぱり意味が判りません。
詳細表示のフォームに WHERE節をしてするのとVBAのプログラムだけで抽出は矛盾。
それに抽出もしていないレコードデータを参照するコマンドボタンの必要性も今一。
ID__fld_1__fld_2
_1__A____________2
_2__B____________1
_3__C____________3
例えば、
Private Sub コマンド0_Click()
DoCmd.OpenForm "tab1", acNormal, , "fld_2=2"
End Sub
質問文のみで判断すれば、このようにフォーム[tab1]を条件節を指定してオープン。
が、フォーム[tab1]のロードイベントでもレコードソースをセットしている。
ならば、条件節を指定する意味がないです。
どうしても、フォーム[tab1]のロードイベントでレコードソースを設定する必要があれば・・・。
Private Sub コマンド0_Click()
DoCmd.OpenForm "tab1", acNormal, , , , , _
"SELECT * FROM tab1 WHERE fld_2=2 ORDER BY fld_2"
End Sub
と、レコードソースそのものをフォーム[tab1]のオープン時に指定。
Private Sub Form_Load()
If Len(Me.OpenArgs & "") Then
Me.RecordSource = Me.OpenArgs
End If
End Sub
Private Sub コマンド8_Click()
DoCmd.GoToRecord , , acNext
End Sub
>尚、全てのデーターは下記にあります。
そんな、得体の知れないファイルをダウンロードする勇気はないです。
簡潔に、解決したい問題点を整理して提示されたし。
「出来ない」という事情説明よりも、解決すべき問題点の提示が肝心。
と、思います。
この回答への補足
ご指導ありがとうございます。詳細フォームに検索結果のレーコードソースを設定すべく悪戦苦闘中です。(エラー続発)改めてご指導を戴くことになると思いますが、しばらくはいろいろ試してみます。ありがとうございました。
補足日時:2008/05/19 03:19サブフォームで抽出したデーターをレコードセットして再利用することには失敗しましたが、詳細フォームを開く際に同一条件で再度フィルターを掛けることで一応目的を達成することができました。ただ、新たな問題が発生しました。
Private Sub 次へ_Click()
DoCmd.GoToRecord , , acNext
End Sub
これで移動はできますが、次のレコードが無いのに「次へ」をクリックするとエラー表示と一緒にプログラムまで表示されてしまいます。そこで、次のレコードがない場合にクリックを無効にしたいのですが、方法はありますか?
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
AccessでIDを入力したら他の項...
-
ACCESSでVBAから選択クエリの抽...
-
サブフォームを利用したクエリ...
-
アクセスのフォームに連番を表...
-
ACCESSで、EXCELのような、sumi...
-
ACCESS クエリのデザインビュ...
-
Accessでフィルタの実行アクシ...
-
アクセスのパラメータクエリを...
-
AccessでログインIDを抽出条件...
-
(続き)accessでの2段階クエリの...
-
ACCESS2007 マクロ クエリのパ...
-
アクセスで期間を指定しての抽...
-
ACCESSのフォームでボタンを押...
-
Access サブフォームでの選択行...
-
エクセルで、抽出したデータだ...
-
前のレコードの値を自動で入れたい
-
Access チェックボックスを利用...
-
access クエリ yes/no型のクエ...
-
PDFファイル/抽出許可され...
-
Access 複数フォームを...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
ACCESSでVBAから選択クエリの抽...
-
AccessでIDを入力したら他の項...
-
ACCESSで、EXCELのような、sumi...
-
Accessクエリの抽出条件にフォ...
-
クエリ実行結果0件の場合のフ...
-
アクセスのフォームに連番を表...
-
ACCESS2007 マクロ クエリのパ...
-
ACCESS2003のグループ化のエラ...
-
ACCESS フォームで抽出したデー...
-
ACCESSで、フォームで抽出した...
-
ACCESS クエリのデザインビュ...
-
クエリーの結果をフォームに表...
-
サブフォームを利用したクエリ...
-
VarChar型をINT型に変換するには
-
Access 抽出したフォームをフ...
-
AccessのフォームをExcelに出力
-
ACCESSのレポートにフォームの...
-
【Access2000】月末の日付を条...
-
Accessのパラメータクエリ作成...
-
AccessでログインIDを抽出条件...
おすすめ情報