ﾕｰｻﾞｰﾌｫｰﾑのﾗﾍﾞﾙを指定数作成

各項目に数の異なった複数の備考が記載されており、ボタンを押すと各項目に対しての備考が整理され、ﾕｰｻﾞｰﾌｫｰﾑに表示させたいのですが、ﾕｰｻﾞｰﾌｫｰﾑのﾗﾍﾞﾙを要素分のみ表示させる（作成させる）ことは可能でしょうか。
例）
項目1：備考1、備考2,備考3
項目1：備考1
項目1：備考1、備考2
････

ネット検索では近いものを見つけることが出来ず質問いたしました。

マクロ上でのﾗﾍﾞﾙ作成が出来ればありがたいのですが・・・。

よろしくお願いします。

sinzou

2020/08/31 07:16

全て配置しておいて、プロパティのVisibleで必要な項目のみ表示する。、、とか

行動規範の内容に同意します

回答2件

ベストアンサー

動的にラベルを作成するサンプルです。
以下では9個のラベルを動的に作成します。
Setのあとの2行はキャプションの設定とX座標の設定です。
サンプルなので適当に修正して活用してください。

VBA
1For i = 1 To 9
2    Set lbl = Controls.Add("Forms.Label.1", "Label" & i)
3    lbl.Caption = "Label" & i
4    lbl.Left = 30 * i
5Next

投稿2020/08/31 07:21

ttyp03

総合スコア17000

ice930

2020/08/31 12:42

ご指摘の通り作成したら希望のコードが完成しました！ありがとうございます！

行動規範の内容に同意します

中ほどから下に「ループで複数のラベルを追加するサンプルコード」があります
Excel VBA ユーザーフォームにラベルの追加と詳細設定する方法

投稿2020/08/31 07:16

radames1000

総合スコア1925

ice930

2020/08/31 12:44

とても分かり易いサイトです！参考にさせていただきましたありがとうございました！！

行動規範の内容に同意します

あなたの回答

tips

プレビュー

行動規範の内容に同意します

質問の解決につながる回答をしましょう。サンプルコードなど、より具体的な説明があると質問者の理解の助けになります。また、読む側のことを考えた、分かりやすい文章を心がけましょう。

15分調べてもわからないことは
teratailで質問しよう！

ただいまの回答率
85.35%

質問をまとめることで
思考を整理して素早く解決

テンプレート機能で
簡単に質問をまとめる

質問する

質問をすることでしか得られない、回答やアドバイスがある。

15分調べてもわからないことは、質問しよう！

ﾕｰｻﾞｰﾌｫｰﾑのﾗﾍﾞﾙを指定数作成

関連した質問