VBA～ユーザーフォームのコマンドボタンでフォント色の設定をしよう～Excel

ユーザーフォームのコマンドボタンのフォント色を設定したい場合はForeColorプロパティを設定します。

書き方

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

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

UserForm1というユーザーフォームを作成し、CommandBotton1というコマンドボタンを設定した場合、下のコードを実行するとコマンドボタンのフォント色が赤になります。

Sub test1()

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

End Sub

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

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