|
▼まこさん さん:
こんにちは。
>ご覧いただきありがとうございます。
>VBAを使い始めて半年くらいです。今回以下のようなことでつまづき先に進むことができません。宜しくお願いします。
>コンボボックスで値を選択し、changeイベントでコンボボックスの該当する値についてMSGBOX関数を表示させているのですが、MSGBOXが表示された段階でまだドロップダウンしている状態です。当然ドロップダウンリストで他の値を選択できます。そこで選んでしまった値は本来MSGBOXを表示させる値でないため矛盾が起きてしまいます。changeイベントが発生した瞬間にドロップダウンを消して選べなくしたいのですが何か良い方法がないでしょうか。よろしくご教授のほどお願いいたします。
現象確認しました。知りませんでした(メモメモ・・)。
'==================================================
Private Sub ComboBox1_Change()
With ComboBox1
.Enabled = False
MsgBox .Value
.Enabled = True
End With
End Sub
だと、ドロップダウンリストが消えました。
他には、ユーザーフォームを使用して、自作のメッセージボックスを作った場合は、
ユーザーフォーム呼び出しただけで消えました。
他にも方法があるでしょうか?
|
|