1

私はコンボボックスを持っています。その値は、タイプAまたはタイプBのものです。ユーザーにとってどのタイプであるかは重要ではありませんが、値は異なるシートからのものです。

異なるシートの 2 つの範囲に Union を使用することはできないため、ユニオンを単に rowsource をスローするように割り当てることはできません。

同じシートに入れずに、両方の範囲をコンボボックスに入れる方法はありますか?

4

2 に答える 2

2

範囲をループして各項目を個別に追加することで解決しました。

Dim rango1 As Range, rango2 As Range
Set rango1 = Sheets("1").Range("A1:A100")
Set rango2 = Sheets("2").Range("A1:A100")

For Each cell In rango1
    ComboBox1.AddItem cell.Text
Next
For Each cell In rango2
    ComboBox1.AddItem cell.Text
Next
于 2013-08-27T20:21:48.300 に答える