プロが教える店舗&オフィスのセキュリティ対策術

Private Sub ComboBox1_Change()
Dim si As Integer
With UserForm1
.ComboBox2.Text = ""
si = .ComboBox1.ListIndex ' ComboBox1 の何番目が選択されたかを得る
Select Case si
Case 0 ' 0番が選択されていたらComboBox2 の内容をC列から作成する
.ComboBox2.RowSource = "Sheet1!C1"
Case 1
.ComboBox2.RowSource = "Sheet1!C2"
End Select
End With
End Sub

コンボボックス1で選択された値に対して『Sheet1!C1』が
表示されるようにするには、『.RowSource』の部分に
適切な言語がありますでしょうか。

また、『.RowSource』は、こういう効果がある等
紹介しているサイトをご存知あれば教えてください。
(探してみたのですが、めぐり合えず)

A 回答 (1件)

>『.RowSource』の部分に適切な言語がありますでしょうか。


言語?セル範囲を指定する以外は受け付けないと思いますが
>『.RowSource』は、こういう効果がある等
どんな効果を求めているのでしょうか?
    • good
    • 0

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