在Execl表格中同步引用图片 ，即A1单元格为1时，工作表显示图片1，A1单元格为2时，工作表显示图片2......

Question

如题所述

Answer 1

1.视图-工具栏-控件工具箱，插入几个image控件，并为每个image控件插入一个图片,Locked属性设为False
2.以两个图片为例,Alt+F11,将下面程序粘贴到ThisWorkBook模块中
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
Sheets("sheet1").Image1.Visible = False
Sheets("sheet1").Image2.Visible = False
Select Case [a1]
Case 1
Sheets("sheet1").Image1.Visible = True
Case 2
Sheets("sheet1").Image2.Visible = True
End Select
End Sub
退出设计模式
在A1中输入1则图片1显示，输入2则图2显示，其他值都关闭
如果将[a1]改为ActiveCell则根据当前单元格（任一位置）的值变化图片

Answer 2

图片参数需要调用宏命令，为图片设置显示属性即可。

函数是不可能实现的。