ユーザーフォームに配置したラベル(Label)を使う時は、テキストボックスなどと一緒に説明書きやタイトルに使う事が多いですが、ラベル名(キャプション)を検索結果やセルの値を取得して書き換えたいと思ったことありませんか?
そして2つの別々のセルの値を1つのラベルにまとめて表示させることもできたら便利だと思いませんか?
この方法は意外と簡単でセル番地の間に「&」を入力するだけでできるようになるので、VBAコードをご紹介します。
セル番地や”名前”を「&」で結合
ここでは、ラベル(label)のプロパティにあるキャプションを「登録者数」とすることで、ユーザーフォームが開くとラベル名が「登録者数」と当然表示されます。
そして、新規追加登録をする(コマンドボタンを押す)と自動的にラベル名が「登録者数+セルの値+名」で表示させるようにします。
これにより、今何名登録されているのかが分かるようになりますが、ここではラベルのキャプション取得に絞って記載します。
![ラベル名結合表示1](https://tripbowl.net/wp-content/uploads/2023/09/07459c562f59184fac7d289c1aef86c6-1024x682.jpg)
Private Sub CommandButton1_Click()
Label1.Caption = “登録者数 ” & Range(“A2”).Value & “ 名”
End Sub
- コマンドボタン1がクリックされたら
- ラベル1の文字を「登録者数 セルA2の値 名」と書き換える
- マクロ記録終了
![ラベル名結合表示2](https://tripbowl.net/wp-content/uploads/2023/09/3ad3416bcbc6b1c5aae7ddba500e0547-1024x682.jpg)
![](https://tripbowl.net/wp-content/uploads/2018/07/cropped-512x512.jpg)
全角スペースを入れておくと上記のように見やすくなりますよ!
また、2つのセルの値を結合するならば(セルA2とセルB2の場合)下記のように「セル番地 & セル番地」にするだけですよ!
Private Sub CommandButton1_Click()
Label1.Caption = Range(“A2”).Value & Range(“B2”).Value
End Sub
関連記事
-
複数のラベル名を一括で複数のセルの値に書き換える方法
ラベルキャプションをセルの値から一括取得 ボウリングの大会や予約でASで名前登録作業を行っていて、一人目の名前を入れると、空欄の部分に登録した名前が表示され、二… -
VLOOKUPをVBAラベルを活用してデータ検索・修正をする方法
ラベル(Label)にVBAコードを記述する ボウリング成績表でも使っているユーザーフォームに配置した文字を表示するための「ラベル(Label)」にも、実はVBAコードを記述… -
2つ別々のセルの値を1つのラベルに結合して表示するVBA
ユーザーフォームに配置したラベル(Label)を使う時は、テキストボックスなどと一緒に説明書きやタイトルに使う事が多いですが、ラベル名(キャプション)を検索結果や… -
ユーザーフォームを開く時にラベルの名前を書き換えて表示する方法
ユーザーフォームに配置したラベル名「Label1」が、フォーム表示と同時に名前や日付などに自動的に表示を変えることができるのをご存知ですか? 方法は簡単で指定したセ…
紅葉スポット
-
黄金色の世界へ茨城県立歴史館のいちょう並木道と水戸偕楽園へ
梅で有名な水戸偕楽園には毎年多くの観光客が2月中旬~3月上旬にかけて訪れますが、紅葉の11月上旬~11月下旬までも偕楽園のもみじ谷と茨城県立歴史館のいちょう並木を… -
群馬甘楽町の紅葉山公園へのバスが廃止でも1回500円の愛タク利用へ
【紅葉見頃】11月上旬~11月中旬 富岡市のコミュニティーバスが2020年で廃止になり利用しづらくなりましたが、代わりに2021年から登場したデマンドタクシーがあるので… -
養老渓谷紅葉ライトアップへ上総中野駅からバスで滞在時間3時間
懐かしい国鉄車両に乗車できるいすみ鉄道に乗って、昭和の風情が残る養老渓谷の温泉街で地元振興もかねて「養老渓谷もみじまつり」が行われ、ライトアップも行いながら… -
電車とバスのフリーきっぷで行ける10月見頃の紅葉スポットへ
見頃順人気順10月見頃11月見頃12月見頃 関東エリアの人気紅葉スポット 関東地方で紅葉名所といえばなんといっても日光ですが、紅葉シーズンになると平日でもいろは坂は… -
日本庭園「松雲山荘」へ柏崎駅から徒歩圏内の大正時代からの紅葉名所
紅葉見頃 10月下旬~11月下旬 約3,000本つつじやもみじなどで大正時代に作られた日本庭園で、柏崎ガス創設者の飯塚謙三氏から柏崎市に移譲され無料で庭園内を散策でき… -
日光白根山ロープウェイで標高1400mから2000mの紅葉遊覧へ
丸沼高原といえば首都圏から日帰りで行くことができるスキー場ですが、秋の紅葉シーズンになるとひと足早く木々が色づき、リフトから山頂へ向かえば紅葉絶景の景色が広…