Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


41213 / 76736 ←次へ | 前へ→

【40604】Re:コンボボックスのリストについて
発言  ichinose  - 06/7/18(火) 18:45 -

引用なし
パスワード
   ▼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の列のデータだと表示するのですが・・・
>
>どうしてでしょうか?どなたか宜しくお願い致します。
0 hits

【40601】コンボボックスのリストについて TANAKA 06/7/18(火) 18:19 質問
【40603】Re:コンボボックスのリストについて ハト 06/7/18(火) 18:41 回答
【40604】Re:コンボボックスのリストについて ichinose 06/7/18(火) 18:45 発言
【40607】Re:コンボボックスのリストについて TANAKA 06/7/18(火) 19:23 お礼

41213 / 76736 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free