Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

35869 / 76738

←次へ　｜　前へ→


	【46060】Re:ユーザーフォームのリストを検索→転記

yasu - 07/1/22(月) 0:21 -


	引用なし

	パスワード

▼かみちゃんさん：

>>ListBox1が1つ（始め特定セルをクリックした時---テキスト.txt表示用）
>
>ここがわかりません。
>なぜ、そのようなことがしたいのですか？
>先にTextBox1に検索値を入れて、ListBox2に部分一致するデータを表示することではいけないのですか？
特に問題は無いような気がしますが、
念のため確認用に表示してます。
>ListBox1からTextBox1の検索値に部分一致しない選択肢を消去することもできますけど？
>なんとなくListBox1は、意味のないものに感じます。
>
>>>3.TextBox1の値に検索値を入れる
>>>　（カタカナでもＯＫ。全角半角、大文字小文字はとりあえず区別すること）
>>ちょっと希望
>>検索時カタカナ　全角半角　大文字小文字はテキスト.txtがまちまちのため
>>オール対応どちらでも検索結果に表示したいです。
>
>あとにしませんか？

かみちゃんさんからそう言われては
お待ちするしかないですね。
>
>>>6.ListBox2をクリックしたらセルへ転記？
>>ok
>>下記のように記述しました。
>>
>>Private Sub ListBox2_MouseUp(ByVal Button As Integer, _
>>　　　　ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
>>　　ActiveCell.Value = Left(ListBox2.Value, 6)
>>　　Unload Me
>>End Sub
>>
>>>　この部分が今ひとつわかりません。
>>>　どのタイミングでセルへ転記するのですか？
>>検索結果を表示後、表示された内容に目的の名前があれば
>>クリック→転記→終了　なければ再検索あるいは終了し手入力
>>
>>>　ListBoxではなく、ComboBoxではないのですか？
>>どの部分ですかComboBox？
>
>なぜ、ListBoxを使うのですか？
>選択がひとつだけならば、ComboBoxでいいのでは？

会社名のリストなのですが
同じ会社名でも
○○社　東京支店
○○社　名古屋支店
複数店ある場合が多くその店ごとにコードが決められてあり
多い店では5～10件程度となるためにListBoxを使っております。

>いや、ListBoxでは具合が悪いとかそういう意味ではありません。
>
>>その上で全角半角・大文字小文字を何とかなりませんか・・・
>
>ListBox表示するときに、全角・半角、大文字・小文字を統一できたらいいのですが、
>そういうわけにはいきませんか？
会社の会計専用ソフトのデータを引き出してきていますので
出来ればそのまま使いたいのですが
千数百件もあると見落としもあると思うので・・・
よろしくお願いします。

0 hits

▼

【46028】ユーザーフォームのリストを検索→転記 yasu 07/1/21(日) 17:02