Excel VBA質問箱 IV

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

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


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

66199 / 76738

←次へ　｜　前へ→


	【15105】オブジェクトを配列化できないでしょうか？

はっしー - 04/6/15(火) 17:38 -


	引用なし

	パスワード

いつもお世話になっております m(_ _)m。

現在､ラベルをシートのセルのように並べたフォームを作っています。
ラベルの名前を
１列目 lbl0101, lbl0201, lbl0301
２列目 lbl0102, lbl0202, lbl0302

という具合にしています。

これを初期化する時にデフォルトの背景色やフォントを決めて､値を表示するたびに背景色､フォントを変えて､さらに値を変える前に初期化→値の変更､といった具合のコーディングをしています。

初期化の欄に

With lbl0101
　　 .backcolor = ########
　　 .caption　 = ########
End with

といった具合にラベルの数だけ書き連ねています。
もちろん値を変更するコードでも同じようなことをしています。
かなり大量にラベルがあるので(ざっと勘定をしたところ２１０×３枚ありました(-_-;)）面を食らっています(自分で作っておきながら）。

そこで、このコードをもっと効率的にする方法はないのか考えています。
例えばlbl0101などオブジェクト名の後半部分の数字を配列化して、変数を当ててループでまわすようなことができればだいぶすっきりしたコードになると思うのですが。

どなたかいい方法があればご教示いただきたく思います。
なにとぞよろしくお願いいたします。

2 hits

▼

【15105】オブジェクトを配列化できないでしょうか？ はっしー 04/6/15(火) 17:38

≪