Microsoft Access 掲示板

Microsoft Access 掲示板

コンボボックスに入力したテキストを追加する / 9

9
hiroton 2020/11/06 (金) 11:19:19 f9f49@f966d

同じ内容を入力したくないなら更新後処理で規定値を変更するようにすればいいです

Private Sub 種類_AfterUpdate()
    Me!種類.DefaultValue = Me!種類
End Sub

さらに、登録済みデータ（Tデータとする）から種類を選択したいなら登録済みデータからリストを作ってしまえばいいです。フォームを開いた後に追加されたデータはリストに表示されないのでフォーカス取得時にリストを更新するようにします

値集合ソース：SELECT 種類 FROM Tデータ GROUP BY 種類 ORDER BY 種類;
値集合タイプ：テーブル/クエリ
入力チェック：いいえ

Private Sub 種類_AfterUpdate()
    Me!種類.DefaultValue = Me!種類
End Sub

Private Sub 種類_Enter()
    Me!種類.Requery
End Sub

登録済みデータのうち一部を表示したいとかだとやっぱり値リストやそれ用に別なテーブルを作る必要があります

通報 ...