A 回答 (1件)
- 最新から表示
- 回答順に表示
No.1
- 回答日時:
なんのアプリの話でしょうか。
コンボボックスで選択リストから何かを選択したとき、フォーム上の何がどのようになるのが理想なのでしょうか。
その機能は現在どのように処理させているのでしょうか。
ここから先は私の勝手な妄想なので全く希望に沿わない可能性があります。
------------------
アプリケーションは Access を使用。
連絡先の一覧を格納しているテーブル [Addresses] がある。
連絡先一覧を表示させるためのフォーム [AddressesForm] がある。
フォームのレコードソースは [Addresses] をそのまま使用。
フォームで表示している列の中に部署名のフィールドである [Division] がある。
Division 列の値は人によっては 「●●部」だったり「●●部 ●●課」だったり「●●部 ●●課 ●●係」だったり違いがある。
フォームのヘッダー部分にコンボボックスを設置し、部署名を選択できるようにしたい。
コンボボックスの選択リストは "部" の名称一覧を入れてある。(●●部)
さらに、部名のほかに 「すべて」 というキーワードも追加してある。
コンボボックスで部名を選ぶと、Division 列が「その部名から始まる」レコードだけを表示するようにしたい。
「すべて」を選択した場合はすべてのレコードが表示されるようにしたい。
------------------
フォーム AddressesForm をデザイン モードで開く。
ヘッダー部分にコンボボックスを設置し、プロパティ シートの [その他] のタブの [名前] でコンボボックスの名前を combDivisionFilter に変更する。
プロパティ シートの [イベント] にある [変更時] を選択し、[…] をクリック。[ビルダーの選択] から 「コード ビルダー」を選択して [OK] をクリック。
VBA のエディターが開く。
Private Sub combDivisionFilter_Change()
End Sub
というコードが生成されるので、下記のように変更する。
Private Sub combDivisionFilter_Change()
Dim filterValue As String
filterValue = combDivisionFilter.Value
If filterValue = "すべて" Then filterValue = "*"
Form.Filter = "Division Like '" & filterValue & "*'"
Form.FilterOn = True
End Sub
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Access(アクセス) Accessの参照フィールドの列がずれてしまいます 1 2023/07/19 15:00
- Visual Basic(VBA) ユーザーフォームの書き出しで追加のご相談 ユーザーフォームの値をシートに書き出す際、コードが表示され 2 2022/08/05 10:58
- Access(アクセス) Accessにインポートした複数のテーブルを表示させる方法が分かりません。 1 2023/01/30 20:22
- Visual Basic(VBA) ExcelVBA ドロップボックスで月を選択するとそれ以降のデータが残るようにしたい。 3 2022/12/16 14:53
- Visual Basic(VBA) Excel VBA ユーザーフォーム1のコンボボックスに別ブックの値を反映させたいです。 6 2023/03/21 16:12
- HTML・CSS VB.net コンボボックス 2 2022/06/30 20:37
- Visual Basic(VBA) EXCEL VBA データベースの内容をユーザーフォームに表示したい。 5 2023/02/14 11:40
- Visual Basic(VBA) VB.net 1 2022/08/18 19:21
- Visual Basic(VBA) VB.net 1 2022/08/17 19:28
- Visual Basic(VBA) EXCEL VBA ユーザーフォームの内容をループでデータベースに登録したい。 2 2023/02/02 10:22
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Accessのコンボボックスでリス...
-
Accessのコンボボックスの値が...
-
.flex-direction プロパティは...
-
ACCESSでコンボボックスにSQLで...
-
コンボボックスのボタンの大き...
-
ACCESS VBA CSVのインポート ...
-
ACCESSクエリ抽出条件について
-
[Access2003]コンボボックスと...
-
ACCESS リストボックスの字の色...
-
帳票フォームでのあるコンボボ...
-
Access サブフォームでの選択行...
-
エクセルで、抽出したデータだ...
-
ACCESSで、EXCELのような、sumi...
-
ソフトの製品コードを知りたい
-
スクロールバーをVBAで操作したい
-
ACCESSでVBAから選択クエリの抽...
-
ACCSESS2013VBA フォームのレコ...
-
access の 最終レコードの判定...
-
googleフォームでインストール...
-
サブフォームのデータを保存す...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Accessのコンボボックスの値が...
-
Accessのコンボボックスでリス...
-
帳票フォームでのあるコンボボ...
-
accessでオートコンプリート機...
-
Accessのコンボボックスの”すべ...
-
ACCESSクエリ抽出条件について
-
ACCESS リストボックスの字の色...
-
ACCESSでコンボボックスにSQLで...
-
Accessのコンボボックスのデフ...
-
ACCESS VBA CSVのインポート ...
-
更新クエリで変数は使えない?
-
Access 個別部署名テーブルから...
-
フォームでの検索
-
Access フォーム内 コンボから...
-
Accessのフォーム(コンボボッ...
-
Oracleで文字列型の時間を引き...
-
Access 帳票フォームのコンボボ...
-
アクセスでのコンボボックス複...
-
リストボックスの時はリンク先...
-
accessでのリストボックス選択...
おすすめ情報