Excel VBA質問箱 IV

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

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


63089 / 76738 ←次へ | 前へ→

【18248】Re:ラベルのクリックを取得するには
質問  ponpon  - 04/9/19(日) 14:36 -

引用なし
パスワード
   ▼ichinose さんへ
こんにちは!
 朝からずっとやっています。
 新しいブックで試したらうまくいきました。
しかし、今までのブックに貼り付けて実行するとうまくいきません。
 
 Private Sub UserForm_Initialize()

  Dim idx As Long
  Set cls = New Class1
  With cls
   .init_lbl 15 'ラベルの数
   For idx = 34 To 48   '←ラベルの数だけループ
    .set_lbl idx, Controls("Label" & idx)
    Next
   .init_txt 60 'テキストボックスの数
   For idx = 1 To 60 'テキストボックスの数だけループ
    .set_txt idx, Controls("TextBox" & idx)
    Next
   End With
  Set cpy_lbl = Nothing

この部分を挿入して実行すると 「インデックスが有効範囲にありません」とでます。
このエラーはよくお目にかかります。たぶんオブジェクトの名前が間違っているのだろうと思っていろいろと考えたのですが解決できません。
 ちなみにユーザーフォームの名前は「form時間割」です。
 どんなことが考えられるか 助けてください。
 今から出かけますので後は夜になると思います。
 

0 hits

【18241】ラベルのクリックを取得するには ponpon 04/9/19(日) 3:37 質問
【18242】Re:ラベルのクリックを取得するには かみちゃん 04/9/19(日) 8:17 発言
【18243】Re:ラベルのクリックを取得するには ponpon 04/9/19(日) 10:03 質問
【18244】Re:ラベルのクリックを取得するには かみちゃん 04/9/19(日) 10:28 回答
【18245】Re:ラベルのクリックを取得するには ichinose 04/9/19(日) 10:40 回答
【18246】Re:ラベルのクリックを取得するには ponpon 04/9/19(日) 11:03 お礼
【18248】Re:ラベルのクリックを取得するには ponpon 04/9/19(日) 14:36 質問
【18253】Re:ラベルのクリックを取得するには ichinose 04/9/19(日) 19:16 発言
【18254】Re:ラベルのクリックを取得するには 追伸 ichinose 04/9/19(日) 19:24 発言
【18258】Re:ラベルのクリックを取得するには 追伸 ponpon 04/9/20(月) 0:08 お礼
【18285】Re:ラベルのクリックを取得するには 追伸 ichinose 04/9/20(月) 12:47 発言
【18415】Re:ラベルのクリックを取得するには 追伸 Kobasan 04/9/22(水) 22:04 発言
【18422】Re:ラベルのクリックを取得するには 追伸 ponpon 04/9/23(木) 12:00 質問
【18423】Re:ラベルのクリックを取得するには 追伸 ponpon 04/9/23(木) 12:12 お礼

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