Excel ユーザーフォームの画像枠内の背景色を変更する-BackStyle、BackColor

Excelで、ユーザーフォーム画像枠内背景色を変更したり、非表示にしたりする記録です。

画像枠内の背景色を変更するには、「BackStyle」プロパティ、「BackColor」プロパティを使います。

手動で設定する方法とVBAで設定する方法です。

< スポンサーリンク >





手動で画像枠内の背景色プロパティを設定

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

Excelユーザーフォーム画像位置

 

画像枠の背景色を赤に設定

プロパティウィンドウの[BackStyle]欄を「1 – fmBackStyleOpaque」に設定すると背景が不透明になります。

Excelユーザーフォーム画像位置

 

背景色を赤にしてみます。

プロパティウィンドウの[BackColor]欄の「▼」をクリックし、[パレット]タブをクリックします。

Excelユーザーフォーム画像位置

 

赤を選択します。

Excelユーザーフォーム画像位置

 

ユーザーフォームを実行すると画像枠の背景色が赤になっています。

Excelユーザーフォーム画像位置

 

画像枠の背景色を透明に設定

プロパティウィンドウの[BackStyle]欄を「0 – fmBackStyleTransparent」に設定すると背景が透明になります。

Excelユーザーフォーム画像位置

Excelユーザーフォーム画像位置

 

VBAで画像枠内の背景色プロパティを設定

Initializeイベントを使って画像枠内の背景色を青と透明に設定してみます。

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

Excelユーザーフォーム画像位置

 

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

Excelユーザーフォーム画像位置

 

画像枠の背景色を青にするコードです。

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

Excelユーザーフォーム画像位置

Excelユーザーフォーム画像位置

 

画像枠内の背景を透明にするコードです。

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

Excelユーザーフォーム画像位置

Excelユーザーフォーム画像位置

 

< スポンサーリンク >※広告先のお問い合わせは広告主様にお願いします