OfficeType

VBA~ユーザーフォームのラベルの文字色を設定しよう~Excel

ユーザーフォームのラベルの文字色を設定したい時は、ForeColorプロパティで設定できます。

書き方

オブジェクト名.ForeColor = 色番号

オブジェクト名はユーザーフォームのオブジェクト名と、ラベルのオブジェクト名を指定します。オブジェクト名の確認方法は作成したユーザーフォームファイルをクリックするとユーザーフォームが表示されます。ユーザーフォーム全体を選択するとプロパティウィンドウにオブジェクト名という項目があるので、それがユーザーフォームのオブジェクト名になります。次にラベルを選択すると同じようにラベルのオブジェクト名が確認できます。プロパティウィンドウが表示されていない場合はメニューの表示からプロパティウィンドウをクリックすると表示されます。

UserForm1というユーザーフォームを作成し、Label1というラベルを設定した場合、下のコードを実行すると文字色が赤に設定されます。

image-01

Sub test1()

Load UserForm1
UserForm1.Label1.ForeColor = RGB(255, 0, 0)
UserForm1.Show

End Sub

プロパティウィンドウで設定

作成したユーザーフォームのファイルをクリックしプロパティウィンドウの選択欄からラベルを選択します。プロパティウィンドウにForeColorの項目があるので、クリックすると▼マークが表示されるのでクリックします。パレットタブをクリックし好きな色を選択するとラベルの文字色が設定できます。プロパティウィンドウが表示されていない場合はメニューの表示からプロパティウィンドウをクリックすると表示されます。

image-02

image-03

image-04

image-05

image-06

image-07