- 締切済み
ComboBox1_Changeについて
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』は、こういう効果がある等 紹介しているサイトをご存知あれば教えてください。 (探してみたのですが、めぐり合えず)
- みんなの回答 (1)
- 専門家の回答
みんなの回答
- hige_082
- ベストアンサー率50% (379/747)
回答No.1
関連するQ&A
このQ&Aのポイント
- キヤノン複合プリンターXK110を購入してから約1.5年経ちましたが、最近コピー機能を使用した際に画像が薄黒くなり、用紙の半分がさらに黒く印刷される現象が発生しました。
- 一度電源を切り再起動した後に印刷すると、スキャナーでも同様の現象が発生しますが、通常の印刷には問題はありません。
- エラーコードは覚えていませんが、修理が必要な状態です。キヤノン製品の修理について教えていただきたいです。