ExcelVBA フォームに配置したラベルの文字を上下中央に配置する方法

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

1.ユーザーフォームを使った入力フォームやガイド画面のラベルで、文字の見た目を調整したい。

2.ユーザーにとって読みやすいデザインを作成したい。

Excel VBA ラベルの文字を上下中央に配置｜使い方とポイント

Option Explicit

Private Sub UserForm_Initialize()
    ' ラベルのプロパティ設定
    With UserForm1.Label1
        .Caption = "上下中央"    ' ラベルの文字
        .TextAlign = fmTextAlignCenter ' 左右中央揃え
        .Width = 100            ' ラベル幅を設定
        .Height = 30            ' ラベル高さを設定

        ' 上下中央に見えるように位置調整
        .Top = (.Parent.Height - .Height) / 2
    End With
End Sub

標準モジュール（ユーザーフォームを表示）

Option Explicit

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

ユーザーフォーム内のラベルを上下中央に配置し、見やすいデザインを実現。データ入力フォームや案内画面の見た目を整えられます。

フォームモジュールのコードをコピペで動作させることで、簡単に設定可能です。これにより、ユーザーにとって見やすく、美しいフォームデザインが実現します。