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

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

下図はExcel2016です。

 

< スポンサーリンク >

 

プロパティで設定

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ユーザーフォーム画像位置

 

< スポンサーリンク >



サブコンテンツ

このページの先頭へ