右击目标单元格,选择“添加批注”,删除批注输入框中所有文字,接着鼠标移动到批注输入框的边线,当指针变成十字箭头时,单击鼠标右键选择“设置批注格式”→“颜色与线条” →“填充效果”→“图片”,再单击“选择图片”添加图片即可。
现在鼠标指向目标单元格即可显示图片,移开鼠标图片就会自动隐藏。如果鼠标移开时图片没有自动消失,可单击Excel窗口左上角的“Office”,在弹出的菜单中单击“Excel选项”,在“Excel选项”窗口左侧选择“高级”,在右侧选择 “仅显示标志符,悬停时加显批注”(图2),确定后图片即可自动隐藏了。
使用如下宏代码 可以 实现该功能
贴出来 给 有兴趣的 同志们 一起 参详
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
For Each im In ActiveSheet.Pictures
im.Delete
Next
If Target.Column = 1 And Target.Row = 1 Then
Set p = ActiveSheet.Pictures.Insert("c:\1.bmp")
p.Left = Target.Left + Target.Width
p.Top = Target.Top
End If
End Sub
讲解一下
“Private Sub Worksheet_SelectionChange(ByVal Target As Range)”意思是 响应 表格选择区域的 变化,即 选择区域变化了 执行 代码;参数target可以用来引用 选择的区域;
第一段 的 功能 是 删除 所有 图片
第二段 的 功能 是 当 A1 单元格(Target.Column = 1 And Target.Row = 1)被选中时,显示C盘根目录下的1.bmp图片;相应的可以修改代码,实现不同单元格的点选,显示不同图片,根据具体需要而定。
如有不明,百度HI我,在线~~
这个EXCEL实际不了,EXCEL不是万能的。没有这种功能设计,是没有办法的。
用控件,VBA控制。