|
▼UO3 さん:
>▼亜矢 さん:
>
>連投失礼。
>
>あるいは、テキストボックス上でファンクションキーを押すとか。
>
>Private Sub TextBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
>
>キー入力がこれで捕捉できます。
>で、KeyCode が vbKeyF1 なら F1キーが押されたという判断ができます。
>
>いずれにしても、あるもの、使えるもののなかで、やりくりするしかないですねぇ。
たまたま、他のところで情報を入手して、実行したら、
Textbox_DropbuttonClickができる様になりました。
なおUserformには下記の記入しました。
Private Sub UserForm_Initialize()
Dim i
For i = 52 To 71
UserForm1.Controls("Textbox" & i).ShowDropButtonWhen = fmShowDropButtonWhenAlways
Next
End Sub
いろいろありがとうございました。
|
|