[[20170509130537]] 『ユーザーフォーム上のリストボックスのリストの枠』(ろっくん) ページの最後に飛ぶ

[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]

 

『ユーザーフォーム上のリストボックスのリストの枠線をなくしたい』(ろっくん)

 ユーザーフォーム上でListBoxを使用しています。
 配列(AddList)に格納したデータを表示させるために
 UserForm1.ListBox1.List = AddList
 とし、MultiSelectプロパティをfmMultiSelectMultiに設定し、
 Showで表示させるとデータは表示されるのですが、
 表示されたリストの1つ1つが点線の枠線で囲まれてしまいます。

 見栄えが悪いのでこの枠線を表示させないようにしたいのですが
 なんとかいい方法はないでしょうか?

 ちなみに、EnableをFalseに設定するとこの枠線は表示されないのですが、
 EnableをTrueに設定したとたんに枠線が表示されてしまいます。

< 使用 Excel:Excel2010、使用 OS:Windows7 >


コントロールにフォーカスがある事を表現しているので、ありのまま受け入れるのが一番かと思いますよ。
または、以下のように、マウスクリックされた後は必ず他のコントロールにフォーカスを移してしまえば、点線は見えなくなります。

 Private Sub ListBox1_MouseUp(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
    CommandButton1.SetFocus
 End Sub
(???) 2017/05/09(火) 14:27

 ご回答ありがとうございます。
 フォーカスを別のオブジェクトにセットすることで
 解決いたしました!

 ありがとうございました!
(ろっくん) 2017/05/09(火) 16:12

コメント返信:

[ 一覧(最新更新順) ]


YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki. Modified by kazu.