Excel ユーザーフォームの画像枠の表示・非表示を設定する-BorderStyle、BorderColor

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

枠線は「BorderStyle」プロパティ、枠線の色は「BorderColor」プロパティを使います。

< スポンサーリンク >





手動で枠線のプロパティを設定

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

Excelユーザーフォーム画像枠

 

画像枠を赤に設定

プロパティウィンドウの[BorderStyle]欄を「1 – fmBorderStyleSingle」に設定すると枠が表示されます。

Excelユーザーフォーム画像枠

 

枠線を赤にしてみます。

プロパティウィンドウの[BorderColor]欄の「▼」をクリックします。

Excelユーザーフォーム画像枠

 

[パレット]タブをクリックします。

Excelユーザーフォーム画像枠

 

赤を選択します。

Excelユーザーフォーム画像枠

 

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

Excelユーザーフォーム画像枠

 

画像枠を透明に設定

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

Excelユーザーフォーム画像枠

Excelユーザーフォーム画像枠

 

VBAで枠線のプロパティを設定

Initializeイベントを使って枠線を青と透明に設定してみます。

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

Excelユーザーフォーム画像枠

 

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

Excelユーザーフォーム画像枠

 

画像枠を青にするコードです。

Private Sub UserForm_Initialize()
    With Image1
        .BorderStyle = fmBorderStyleSingle
        .BorderColor = RGB(0, 0, 255)
    End With
End Sub

Excelユーザーフォーム画像枠

Excelユーザーフォーム画像枠

 

画像枠を透明にするコードです。

Private Sub UserForm_Initialize()
    Image1.BorderStyle = fmBorderStyleNone
End Sub

Excelユーザーフォーム画像枠

Excelユーザーフォーム画像枠

 

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