エントリーの編集
![loading...](https://b.st-hatena.com/bdefb8944296a0957e54cebcfefc25c4dcff9f5f/images/v4/public/common/loading@2x.gif)
エントリーの編集は全ユーザーに共通の機能です。
必ずガイドラインを一読の上ご利用ください。
記事へのコメント0件
- 注目コメント
- 新着コメント
このエントリーにコメントしてみましょう。
注目コメント算出アルゴリズムの一部にLINEヤフー株式会社の「建設的コメント順位付けモデルAPI」を使用しています
![アプリのスクリーンショット](https://b.st-hatena.com/bdefb8944296a0957e54cebcfefc25c4dcff9f5f/images/v4/public/entry/app-screenshot.png)
- バナー広告なし
- ミュート機能あり
- ダークモード搭載
関連記事
コンボボックスのリストを入力値で制限する
cmb得意先の変更時のイベントプロシージャ Private Sub cmb得意先_Change() Dim stSQL As String stSQL ... cmb得意先の変更時のイベントプロシージャ Private Sub cmb得意先_Change() Dim stSQL As String stSQL = "SELECT 得意先名 FROM 得意先 WHERE フリガナ Like '*" & Me.cmb得意先.Text & "*' ORDER BY フリガナ;" Me.cmb得意先.RowSource = stSQL Me.cmb得意先.Dropdown End Sub 上記はフリガナで制限してますが、得意先名で制限してもいいかもしれません。希望に合わせてWHERE句の条件を変更してください。 さて、上記のコンボボックスでカナを一文字でも入力するとリストがドロップダウンして部分一致で制限されたリストが表示されます。そのリストから2行目以降のデータを選択しようと、↓キーを押すと、テキストボックスに1行目のデータが表示されると同時に、リスト