|
▼TANAKA さん:
こんばんは。
>いつも拝見させてもらっています。
>今回、私もVEAを挑戦しましたが壁にぶち当たってしまいました。
>
>ユーザーフォームのコンボボックスのリストについて質問させてください。
>ワークシートAからユーザーフォームを呼び出して
>ワークシートBのA1:Z1の行のデータをリストに表示させたいのですが
>上手くいきません。
どういうコードを記述して駄目だったのですか?
With combobox1
.list()=worksheets("B").range("a1:z1").value
end with
なんてコードだと一行しか登録されませんね!!
List()にこだわるなら、
With ComboBox1
.List() = Application.Transpose(Worksheets("B").Range("a1:z1"))
End With
他にも
With ComboBox1
.Column() = worksheets("B").Range("a1:z1").Value
End With
こんな方法もあります。確認してください。
>A1:A26の列のデータだと表示するのですが・・・
>
>どうしてでしょうか?どなたか宜しくお願い致します。
|
|