[[20060107131718]]　『リストボックスの白抜き文字の再表示』（rock）　ページの最後に飛ぶ

『リストボックスの白抜き文字の再表示』（rock）

　リストボックスにフォーカスがあるのが分かりづらいので、フォーカスがある時には、
背景に色づけをしましたが、フォカースが無くなった時に、選択されたデータ
を白抜き文字で再表示するにはどうしたらよろしいでしょうか、教えて
下さい

エクセルのバージョン]
Excel2003,

[OSのバージョン]
WindowsXP

 背景の色を変更すると選択が解除されたように見えますね。
 実際は選択されているようです。
 なんか納得できませんが、一度選択解除して選択し直すとやりたいことはできます。
 CHANGEイベントを使用している場合はもう一工夫必要ですね。

 Private Sub ListBox1_Enter()
     Dim a As Long
     With ListBox1
         .BackColor = vbRed
         a = .ListIndex
         .ListIndex = -1
         .ListIndex = a
     End With
 End Sub

 Private Sub ListBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
     Dim a As Long
     With ListBox1
         .BackColor = &H80000005
         a = .ListIndex
         .ListIndex = -1
         .ListIndex = a
     End With
 End Sub
 （やっちん）

　解決出来ました。大変ありがとうございました。

コメント返信：

[ 一覧(最新更新順) ]

[[20060107131718]] 『リストボックスの白抜き文字の再表示』（rock） ページの最後に飛ぶ

[[20060107131718]]　『リストボックスの白抜き文字の再表示』（rock）　ページの最後に飛ぶ