excel 显示图片
发布网友
发布时间:2022-04-29 16:02
我来回答
共1个回答
热心网友
时间:2023-10-17 18:25
1)视图-工具栏-控件工具箱,插入几个image控件,并为每个image控件插入一个图片
2)以两个图片为例,Alt+F11,将下面程序粘贴到ThisWorkBook模块中
Private
Sub
Workbook_SheetSelectionChange(ByVal
Sh
As
Object,ByVal
Target
As
Range)
Image1.Visible
=
False
Image2.Visible
=
False
Select
Case
ActiveCell
Case
1
Image1.Visible
=
True
Case
2
Image2.Visible
=
True
End
Select
End
Sub
3)退出设计模式,根据当前单元格的值显示图几