Access VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

1351 / 9994

←次へ　｜　前へ→


	【11941】Re:帳票フォームと単票フォームの連携

さつき - 11/1/26(水) 20:16 -


	引用なし

	パスワード

▼よろずやさん：
ご回答ありがとうございます。

>単票フォームで何をしたいのでしょう？
>よく判りません。
>1レコードだけ表示したいという話ですか？
>それなら、変数strfilter なんて使わずに
>フィルターに連番をセットするだけでいいと思うのですが。
説明の仕方が悪く、やりたいことが伝わっていなかったようで
申し訳ありません。
RecordsetCloneについて調べているうちに
同じ目的のサンプルを見つけました。
↓
Dim rs As DAO.Recordset

DoCmd.OpenForm "単票フォーム", , , Me.Filter
Set rs = Forms!単票フォーム.Recordset.Clone
rs.FindFirst "連番 = '" & Me!連番.Value & "'"
Forms!単票フォーム.Bookmark = rs.Bookmark
Set rs = Nothing

フォームにフィルタをかけた状態で、
単票フォームを呼び出すのでRecordsetCloneにも
フィルタがかかっているのではないかと思っていましたが、
上記のように再度直前でMe.Filterを実行しないといけないようです。

長々おつきあい頂きありがとうございました。
まだ質問したいことが他にありますので、よろしくお願いします。

1,008 hits

▼

【11922】帳票フォームと単票フォームの連携 さつき 11/1/20(木) 1:26