|
いつもお世話になります。
表題のようにUserForm上のimageコントロールに貼り付けたPicture(.BMP)の背景色を透明にしたいのですが、やり方が良く分かりません。
Image自体の透明化は、BackStyle = 0-fmBackStyleTransparentで出来ました。
またWorksheet上では、
ActiveSheet.Shapes(PicturName).Select
Selection.ShapeRange.PictureFormat.TransparencyColor = _
RGB(255, 255, 255)
で透明化可能なのは確認しました。
やりたいことは、以下のようにPictureを複数枚重ねて表示させることです。
┏UserForm━━━━━━━━━━┓
┃┌Image1─────────┐┃
┃│ Picture1 │┃
┃│ │┃
┃│ ┌Image2──┐ │┃
┃│ │ ■■ │ │┃
┃│ │■■■■ │ │┃
┃│ │Picture2 │ │┃
┃│ └─────┘ │┃
┃└────────────┘┃
┗━━━━━━━━━━━━━━┛
宜しくお願い致します。
ちなみに、Worksheet上でも下の記述では、実行されませんでした。
理由を教えていただければ助かります。
With ActiveSheet.Shapes(PicturName)
.ShapeRange.PictureFormat.TransparencyColor = RGB(255, 255, 255)
End With
|
|