Excel VBA質問箱 IV

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

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


64386 / 76732 ←次へ | 前へ→

【16927】コンボボックスのリストを可変長に設定
質問  はっしー  - 04/8/16(月) 16:31 -

引用なし
パスワード
   いつもお世話になっております m(_ _)m。

VBAでアンケートと集計ができるようなモノをめざしています。
状態として、
シートのセルにひとつづつ質問項目を入力しています。
10の質問事項があればA列の10行まで使います。

この問題をコンボボックスで選択したいと考えております。
問題数が10問だった場合はリストには1〜10の数字がはいり、その中から選択できるようにします。
15問だった場合は15までの数字が入ります。この問題数はその時によって変わります。
また、シートを隠している都合上のようですが、セルをselectしたりシートをactivteにしたりはできません。

この条件で、どのようにしたら実現できるのか、どなたかご教示のほどよろしくお願いします。

ちなみに私の書いたコードは以下の通りです(いろいろとエラーが起こりますが)。


mondaisuu '問題数を格納している変数、すでに問題の数は取得済み
multiintl1 'カウンター
cmbkaitou 'オブジェクト、コンボボックス

multiintl1 = 0
For multiintl1 = 1 To mondaisuu
  cmbkaitou.List(multiintl1) = multiintl1
Next

→これはエラーになります。
配列のインデックスが不正だそうです。

どなたかよろしくお願いいたします(m;_ _)m。

0 hits

【16927】コンボボックスのリストを可変長に設定 はっしー 04/8/16(月) 16:31 質問
【16928】Re:コンボボックスのリストを可変長に設定 IROC 04/8/16(月) 17:03 回答
【16930】Re:コンボボックスのリストを可変長に設定 はっしー 04/8/16(月) 17:26 発言
【16931】Re:コンボボックスのリストを可変長に設定 IROC 04/8/16(月) 17:34 回答
【16934】Re:コンボボックスのリストを可変長に設定 はっしー 04/8/16(月) 17:54 お礼

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