Question

求EXCEL高手解答详细如下图

如何将图片放进指定单元格，可以不在单元格中显示，但点击单元格能在旁边显示出来，我看到有人做出来过，求指点，本人比较笨详细点 谢谢。

Answer 1

没分,没悬念
你等级太低,我怕大坑

---

有底气,图片什么名字 ,跟excel是不是同一个文件夹？

追问

你打这几个字怕浪费时间不？

追答

Function InsertPic(ByRef cel As Range) As Boolean
On Error GoTo L_end
Dim a As Variant
Call DeletePic(cel)
Set a = cel.Worksheet.Pictures.Insert("C:\Users\m0035\Desktop\新建文件夹 (3)\$A$1.jpg")
a.Top = cel.Top + cel.Height
a.Left = cel.Left + cel.Width
a.Width = cel.Width
a.Height = cel.Height * 2
a.Name = "temppic"
Exit Function
L_end:
Debug.Print Err.Description
InsertPic = False
End Function

Function DeletePic(ByVal cel As Range) As Boolean
On Error GoTo L_end
cel.Worksheet.Shapes("temppic").Delete
Exit Function
L_end:
Debug.Print Err.Description
DeletePic = False
End Function

这两个函数我刚写的，也测试了
你要是会用，就说明你聪明
你要不会用，就找个墙自己用

百度不让我传附件，我就传百度云盘了
链接：http://pan.baidu.com/s/1gd7tiTX 密码：4axz
过两天会关闭共享的，你自己下载测试
功能肯定是实现了，但不一定和你的意，自己看着改

PS： 分能多点嘛，真的好少

Answer 2

试下吧，我是成功了的
---------------------------------------
右击目标单元格，选择“添加批注”，删除批注输入框中所有文字，接着鼠标移动到批注输入框的边线，当指针变成十字箭头时，单击鼠标右键选择“设置批注格式”→“颜色与线条” →“填充效果”→“图片”，再单击“选择图片”添加图片即可。

现在鼠标指向目标单元格即可显示图片，移开鼠标图片就会自动隐藏。如果鼠标移开时图片没有自动消失，可单击Excel窗口左上角的“Office”，在弹出的菜单中单击“Excel选项”，在“Excel选项”窗口左侧选择“高级”，在右侧选择 “仅显示标志符，悬停时加显批注”，确定后图片即可自动隐藏了。