| 
    
     |  | いつもお世話になっております 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。
 
 
 |  |