ExcelVBA フォームのラベルにテキストや動的なデータを表示する方法

 

ExcelVBA ユーザーフォームのラベルにテキストや動的なデータを表示することで、ユーザーに情報を伝える役割を果たします。例として、データの確認メッセージや計算結果の表示に使用します。使い方や注意点など、サンプルコードをもとに具体的に解説します。

 

2025年の目標は繰り返し作業に悩まされない年にしませんか? Excel VBAを活用した効率化がその第一歩
本サイト参考:Excel VBAで自動化するコードのベースを習得したい方におすすめの記事

 

Excel VBA ラベルにテキスト 利用シーン

以下のようなシーンで利用で表示します。

1.ユーザーが入力したデータを確認するメッセージとして表示

2.計算やデータ処理の結果を動的にラベルに表示

3.ユーザーフォームでのリアルタイムな情報提供(例: 現在の日付や時間の表示)

使い方

1. ユーザーフォームにラベル(例: Label1 )を配置します。

2. ラベルの Caption プロパティを設定することで値を表示します。

ポイント

1.ラベルの Caption プロパティは文字列しか扱えないため、数値や日付などを設定する場合は文字列に変換します。

2.表示する文字列が長すぎると、ラベルの幅を超える場合があるため、ラベルの幅やフォントサイズに注意してください。

 

Excel VBA  ラベルにテキストのサンプルコード

Excel VBAで効率化の準備をしてみませんか?2025年をよりスムーズに過ごすための資格
基本的な文法やVBAの実践的な応用までを網羅的に学習できる方法は、ExcelVBAエキスパート資格の取得を目指すこと。学習を通して、より効率的に、着実に基礎を身につけることが可能です。資格取得すれば、スキルの証明にもなり、職場での評価アップにも繋がるため、勉強を進めるモチベーションにもなります。
本サイト参考:マクロ知識がないから「何から学べば良いのかわからない」という人におすすめの記事

フォームモジュール(ラベル配置)

ユーザーフォームに以下を配置

ユーザーフォームにラベル(例: Label1 )を配置します。

Option Explicit

Private Sub UserForm_Initialize()
    ' ラベルに固定の文字列を表示
    Me.Label1.Caption = "こんにちは、VBA!"

    ' 現在の日付を表示
    Me.Label1.Caption = "今日の日付: " & Format(Date, "yyyy/mm/dd")
End Sub

フォームモジュール(ボタンをクリックした際にラベルの値を更新)

ユーザーフォームに以下を配置

ユーザーフォームにラベル(例: Label1 )、コマンドボタン(例: CommandButton1 )を配置します。

Option Explicit

Private Sub CommandButton1_Click()
    ' ラベルに動的な値を表示
    Dim userInput As String
    userInput = InputBox("表示したいテキストを入力してください:", "入力")
    If userInput <> "" Then
        Me.Label1.Caption = "入力された値: " & userInput
    Else
        Me.Label1.Caption = "値が入力されませんでした。"
    End If
End Sub

標準モジュール(ユーザーフォームを表示)

Option Explicit

Sub ShowUserForm()
    ' ユーザーフォームを表示
    UserForm1.Show
End Sub

ラベルに値を入れて、固定情報や動的データをユーザーに伝える。データの確認、計算結果の表示、動的な情報更新ができます。

これにより、ユーザーフォームでの情報提示がスムーズに行えます。

 

Excel VBAで自動化するコードのベースを習得したい方におすすめ!

VBAエキスパート資格は、日常業務でExcelを多用し、手動作業を減らしたいと考えている方には価値あるものです。

ExcelVBAエキスパートベーシック
仕事の効率をあげるためにExcelVBAを利用する人が対象の問題集です。


ExcelVBAエキスパートスタンダード

ExcelVBAの開発を仕事にする人が対象の問題集です。

 

Excel  VBA エキスパート資格について知りたい方は、下記「Excel VBAスキルアップを目指すなら知っておきたいVBAエキスパート」をご確認ください。