お世話になっております。
ひとつお聞きしたいのですが、Accessのコンボボックスプロパティの「リスト外入力」の設定のしかたが分かりません。
コンボボックスを非連結にして、コンボボックスより選択してフィルタをかける動作と、コンボボックスに値がなかったらコンボボックスに直接入力して新しい値を元に新規にレコードを追加すると言ったロジックを組み込みたいのですが可能でしょうか?よろしくお願いいたします。
まとめると、
(1)コンボボックスより値を選択して、フィルタをかける。
(2)コンボボックスに値が無かったら、コンボボックスに直接入力して新規レコードとして、レコードを追加する
こう言った、流れでの作業です。
No.2ベストアンサー
- 回答日時:
自分はAccess2000ですのでちょっと違うかも知れませんが・・・
まず、OnNotInList/リスト外入力時イベントは、、"LimitToList/入力チェック" プロパティに [Yes/はい] が設定されている場合のみ発生します。
そして、LimitToList/入力チェック" プロパティに [Yes/はい] が設定されている場合、一覧の選択項目にないテキストを入力することはできません。
これを考慮すると、次のようにすれば、リスト以外の項目が入ったときは、元のリストの一覧に追加できます。
(1)"LimitToList/入力チェック" プロパティに [Yes/はい] を設定
(2)OnNotInList/リスト外入力時イベントに次のような処理を行う。
Dim rst As New ADODB.Recordset
Set rst = New ADODB.Recordset
rst.Open "コンボボックスの元テーブル名", CurrentProject.Connection, adOpenKeyset, adLockOptimistic
rst.AddNew
rst![追加するフィールド名] = NewData
rst.Update
rst.Close
Set rst = Nothing
Me.コンボボックスのコントロール名 = ""
Me.コンボボックスのコントロール名.Requery
とすれば、コンボボックスの元リストに新しい項目を追加できます。
フィルタをかけたければ更新後イベントでフィルタの処理をいれればよいと思います。
とりあえずご参考まで。
No.3
- 回答日時:
》例えば、会員テーブルと言うのがあって、会員名をコンボボックスで選択して、無かったら、コンボボックスに入力して追加させるっていう時にはどの様にすればいいのでしょうか?
》
#2の方がコードを書いてしまっているので、会員名のみを登録する場合はあれで良いでしょう。良く理解してから使ってくださいね。
会員名のみではなく、その他の項目も登録したい場合は、現在のフォームをどのように作っているかで変わってきます。現在のフォームが何をしているかで変わってきます。会員情報入力・表示フォームなのか、会員名でフィルタをかけて、その他の情報(例えば購入履歴など)を表示しようとしているなど。
会員情報入力・表示フォームの場合は、情報を入力してもらって登録してもらうようなメッセージと処理を別途追加します。メッセージはNotInListイベントで、後はそのフォームの登録ボタンなどで。
その他の情報なら、会員情報を入力するフォームを開いてそのデータを登録する処理を追加する事になるでしょう。登録処理は、データ登録フォームでやり、それが終了したら、コンボボックスを Requeryすると。
これらの場合は、#2で書かれたリストに名前だけ登録するコードではなく、上記のような処理になります。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Access(アクセス) Accessの参照フィールドの列がずれてしまいます 1 2023/07/19 15:00
- Visual Basic(VBA) ユーザーフォームの書き出しで追加のご相談 ユーザーフォームの値をシートに書き出す際、コードが表示され 2 2022/08/05 10:58
- Visual Basic(VBA) ExcelVBA ドロップボックスで月を選択するとそれ以降のデータが残るようにしたい。 3 2022/12/16 14:53
- Excel(エクセル) コンボボックス及びリストボックスを5段階連動させる方法をご存知の方ご教授頂きたいです。 Excelで 3 2022/04/03 21:43
- HTML・CSS VB.net コンボボックス 2 2022/06/30 20:37
- Access(アクセス) Accessにインポートした複数のテーブルを表示させる方法が分かりません。 1 2023/01/30 20:22
- Excel(エクセル) Excel コンボボックス バックカラー 1 2023/02/18 08:06
- Access(アクセス) Accessフォーム 一部のレコードだけを抽出する方法について 1 2022/06/28 18:45
- Visual Basic(VBA) Excel VBA ユーザーフォーム1のコンボボックスに別ブックの値を反映させたいです。 6 2023/03/21 16:12
- Visual Basic(VBA) ExcelVBAでユーザーフォームでテキストボックスなどからセルに連続して入力するコーディングの際の 2 2022/06/29 22:51
このQ&Aを見た人はこんなQ&Aも見ています
-
性格の違いは生まれた順番で決まる?長男長女・中間子・末っ子・一人っ子の性格の傾向
同じ環境で生まれ育っても、生まれ順で性格は違うものなのだろうか。家庭教育研究家の田宮由美さんに教えてもらった。
-
アクセス コンボボックスのリスト項目以外を手動で入力は可能ですか
Access(アクセス)
-
ACCESSでfilterとorderbyについて
その他(データベース)
-
ACCESSでVBAから選択クエリの抽出条件を指定したい
Access(アクセス)
-
-
4
ACCESSのフォームで次のレコードに移動しない方法を教えてください
その他(データベース)
-
5
AccessのRefresh・Requery・Repaintの違い
Access(アクセス)
-
6
2つのテーブルに共通するレコードを削除したい
Access(アクセス)
-
7
このオブジェクトに値を代入することはできません
その他(データベース)
-
8
レコードを保存するコード アクセスvba
その他(Microsoft Office)
-
9
ACCSESS2013VBA フォームのレコードソースを変更する
その他(データベース)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
ACCESS リストボックスの字の色...
-
帳票フォームでのあるコンボボ...
-
Accessのコンボボックスでリス...
-
ACCESSでコンボボックスにSQLで...
-
Accessのコンボボックスの値が...
-
Access フォーム内 コンボから...
-
パススルークエリのデータ件数...
-
ACCESSでフラグによる文字表示
-
Accessのコンボボックスのデフ...
-
ACCESSクエリ抽出条件について
-
Oracleで文字列型の時間を引き...
-
エクセルで、抽出したデータだ...
-
Access サブフォームでの選択行...
-
サブフォームでのダブルクリッ...
-
インデックスまたは主キーにはn...
-
前のレコードの値を自動で入れたい
-
ACCESS 複数のフォームから同一...
-
access別のテーブルを参照して...
-
ACCESSでVBAから選択クエリの抽...
-
未審査請求包袋抽出表作成とは...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Accessのコンボボックスでリス...
-
Accessのコンボボックスの値が...
-
ACCESSでコンボボックスにSQLで...
-
ACCESS リストボックスの字の色...
-
帳票フォームでのあるコンボボ...
-
ACCESSクエリ抽出条件について
-
accessでのリストボックス選択...
-
コンボボックスのリスト外入力...
-
accessでオートコンプリート機...
-
Accessのコンボボックスのデフ...
-
Accessのコンボボックスの”すべ...
-
リストボックスの時はリンク先...
-
更新クエリで変数は使えない?
-
(ACCESS)フォームデータシート...
-
Accessのフォーム(コンボボッ...
-
ACCESS コンボボックスについて
-
SQLサーバーからひっぱるACCESS...
-
Accessフォーム 大分類→小分類...
-
Accessでの絞込み選択
-
Access 帳票フォームのコンボボ...
おすすめ情報