投稿日 | : 2002/09/10(Tue) 14:39 |
投稿者 | : Honda |
Eメール | : |
URL | : |
タイトル | : Re: セルに作成したコンボボックスの設定 |
> コンボボックスの設定をそれぞれ変えたいのですが、どうすればよいのですか?
>
> 例えば、
> あるコンボボックスはリストからのみの選択で、
> あるコンボボックスはリストからも自分でも入力ができる形にしたいのです。
そこまではサポートしてないのではないでしょうか?(多分)
ComboListなどにこだわらないのであればこういうのはどうでしょうか、↑の要求も満たせると思います。
Private Sub VSFlexGrid1_BeforeEdit(ByVal Row As Long, ByVal Col As Long, Cancel As Boolean)
'セル(1,1)のみコンボボックス
If Col = 1 And Row = 1 Then
Cancel = True
With VSFlexGrid1
'HeightはSendMessageで設定
Combo1.Move .CellLeft, .CellTop, .CellWidth
End With
Combo1.Visible = True
Combo1.SetFocus
Else
'他は通常どおり
Cancel = False
Combo1.Visible = False
End If
End Sub