Excel ユーザーフォームのコマンドボタンの背景色を変更する-BackStyle、BackColor

Excelで、ユーザーフォームのコマンドボタンの背景色を変更する記録です。

下図はExcel2016です。

< スポンサーリンク >

プロパティで設定

コマンドボタンの背景色を透明にしてみる

VBE上でコマンドボタンをアクティブにし、プロパティウィンドウのボタンをクリックします。

プロパティウィンドウの［BackStyle］欄の「0 – fmBackStyleTransparent」を選択します。

わかりやすいようにフォーム自体の背景色を黄色にしてみます。

ユーザーフォームを実行すると、ボタンの背景色は透明になっています。

コマンドボタンの背景色をピンクにしてみる

プロパティウィンドウの［BackStyle］欄の「1 – fmBackStyleOpaque」を選択し、［Backcolor］欄の「▼」をクリックします。

［BackColor］欄をピンクに設定します。

ユーザーフォームを実行すると、ボタンの背景色はピンクになっています。

VBAで設定

Initializeイベントを使って、コマンドボタンの背景色を変更してみます。

ユーザーフォームをダブルクリックします。

右側のプロシージャボックスで「Initialize」を選択します。

コマンドボタンの背景色を透明に設定するコードです。

Private Sub UserForm_Initialize()
    CommandButton1.BackStyle = fmBackStyleTransparent
End Sub

コマンドボタンの背景色を緑に設定するコードです。

Private Sub UserForm_Initialize()
    With CommandButton1
        .BackStyle = fmBackStyleOpaque
        .BackColor = RGB(0, 255, 0)
    End With
End Sub