いつもおせわになっております。
現在、Accessで家計簿なるものを作っているのですが・・・
まずマスタテーブルから入力データが存在する日付をクエリで抽出し、それをフォームのテキストボックス1のコントロールソースに指定して、そのテキストボックス1に表示されている日付を元にフィルタ機能を使ってその日に入力されたデータ一覧をサブフォームで表示するという方式を取っているのですが・・・(解かり難くてすみません
この方式だとクエリのレコードを移動するとサブフォームの表示内容も対応してその日のが抽出されます。
しかし、データがたくさん蓄積されてくると一日ずつ(1レコードずつ)移動すると手間がかかってイライラしそうです。
で、同じフォームにコンボボックス1を追加し、上記にもあるマスタテーブルから入力されている日付を抜き出した日付一覧を取得してあるクエリを値集合ソースに指定してみました。
クリック時のイベント等もちゃんと設定したのですが、うまく動作してくれません。
コンボボックス1をクリックして選択したら、クエリをコントロールソースとするテキストボックス1の表示内容がコンボボックス1で選択されたものに変更される、みたいなことって出来ないのでしょうか?
コンボボックス1だけにしてテキストボックス1を消すとコンボボックス1で選択した日付の内容をサブフォームで表示することは出来たのですが、それだとコマンドボタンを押して次のフィールドに移動し、かつコンボボックス1の表示内容も自動変更というのが出来なかったので・・・
長文でスミマセンが、どなたかお知恵の拝借お願いします。
No.2ベストアンサー
- 回答日時:
>コンボボックス1をクリックして選択したら・・テキストボックス1の表示内容がコンボボックス1で選択されたものに変更される
コンボボックス1のイベントの更新後処理に
Private Sub コンボボックス1_AfterUpdate()
テキストボックス1 = コンボボックス1.Column(0)
End Sub
(注)コンボボックス1に日付だけ表示の場合はコンボボックス1の左から数えた位置になるのでColumn(0)になります。)
とすれテキストボックス1にコンボボックスで選択した値を表示できます。
AfterUpdateでテキストボックス1に値を表示後そのクエリをMe!クエリ名.Requeryで更新すれば行けると思います。
No.1
- 回答日時:
現在の表示方式が良いのなら、簡単な方法としては以下が考えられます。
(1)コンボボックスの値の変更があった時のイベントとしてフォームのレコードを移動させる。
(2)フォームをクエリとは非連結にして、コンボボックスの値はVBAで読み込む。 日付の移動はコンボボックスの値を変更させることで対応。
双方とも少しVBAを使用します。 どちらかというと(1)のほうが簡単かも。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Access(アクセス) Accessの参照フィールドの列がずれてしまいます 1 2023/07/19 15:00
- その他(データベース) Accessフォームからパラメーターで表示したレコードを指定のExcelのセルへ転送する方法について 2 2022/08/22 18:04
- Access(アクセス) Accessにインポートした複数のテーブルを表示させる方法が分かりません。 1 2023/01/30 20:22
- Access(アクセス) AccessVBAで降順にするテーブル作成クエリを使用して作成したテーブルを削除し同一のテーブル作成 1 2023/01/06 11:17
- Access(アクセス) Accessフォーム 一部のレコードだけを抽出する方法について 1 2022/06/28 18:45
- SQL Server DBのテーブルの設計ができず困っています。 2 2023/06/29 16:43
- Access(アクセス) アクセスの更新クエリでカレントレコードのみ更新したい 1 2022/06/02 23:32
- Access(アクセス) Access 登録ボタンからサブフォームの更新 1 2022/07/22 10:23
- その他(データベース) 更新クエリをリンクデータベーステーブルに実行し実行時エラー3362固有インデックスに重複する値が含ま 1 2022/09/21 11:44
- Excel(エクセル) 【vba】日付の形式が勝手に変わってしまう。 1 2022/09/29 10:54
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
access 検索結果をテキストボッ...
-
4月開始年度の月と日を連動さ...
-
条件に応じてコンボボックスの...
-
Accessのコンボボックス内項目...
-
java初心者です。
-
コンボボックス 選択後のカー...
-
ExcelVBA コンボボックスリスト...
-
Dcount関数が表示されない。
-
Access レポート印刷するときに...
-
データベースのINT型項目にNULL...
-
passwordが入れられません・・・・
-
ACCESS フォームをそのまま印刷...
-
アクセスで数値型のフィールド...
-
YahooのIDがロックされてしまい...
-
サブフォームに対してGoToRecor...
-
「フォームを作成できませんで...
-
レコードを保存するコード ア...
-
フォームで入力しても反映されない
-
クエリで出来た表にチェックボ...
-
フォームの高さを数値で指定し...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
条件に応じてコンボボックスの...
-
コンボボックス 選択後のカー...
-
Accessで家計簿を作っているの...
-
java初心者です。
-
access 検索結果をテキストボッ...
-
Access 2016 のプロパティ(プル...
-
VBA コンボボックスの重複削除
-
エクセルVBA コンボボックスで...
-
CrystalDiskinfoの使い方!HDD/...
-
Dcount関数が表示されない。
-
Accessで、コンボボックスから...
-
エクセルVBAユーザーフォー...
-
Accessのコンボボックス内項目...
-
ACCESS2007 コンボボックス使い方
-
ActiveXコントロールのコンボボ...
-
浮動小数点数型
-
ACCESS2003 プルダウンで
-
ACCESS2003のコンボボックスで...
-
ACCESS VBA で複数項目検索にテ...
-
ExcelVBA コンボボックスリスト...
おすすめ情報