柔軟に働き方を選ぶ時代に必要なこと >>

こんにちは,よろしくお願いします。

複数列のコンボボックスを作成しました。

ワークシートからRowSourceプロパティで”A1:B4”と設定して,
____A列__B列
1行目__あ__A
2行目__え__Z
3行目__さ__D
4行目__き__G

さらに,ColumnCountプロパティを2とし,
ColumnWidthを,72 pt;0 ptとし,B列を表示されないようにしました。

このように,A列だけ表示させて,例えば「え」を選択したとき,特定のセルに「Z」と入力させたいのですがどのようにすれば良いのでしょうか?
このようなことを,以前に行ったことがあるのですが,ヘルプなどを見てもどうしても思い出せません。
すみません,よろしくお願いします。教えて下さい。

このQ&Aに関連する最新のQ&A

A 回答 (3件)

こんばんは。



そのようなときは、Listプロパティを使えば出来ます。
たとえば、選択した直後にD1に入れる場合

Private Sub ComboBox1_Change()
Dim LRow As Long
LRow = Me.ComboBox1.ListIndex
Range("D1").Value = Me.ComboBox1.List(LRow, 1)
End Sub

このような感じでできます。
    • good
    • 0
この回答へのお礼

M-SOFTさん,連日ありがとうございます。
おかげさまで,出来ました。これからもよろしくお願いします。

お礼日時:2011/05/17 21:59

BoundColumnを2にしておき,combobox1.valueを所定のセルに書き出します。

    • good
    • 0

BoundColumnプロパティを2(列目)にしてください。

    • good
    • 0

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!


人気Q&Aランキング