「Excel技巧」用VBA法给单元格批量插入图片批注
office教学2020-03-18 21:12
哈喽，大家好。上一篇文章跟大家介绍的是excel单元格如何手动插入图片批注。但是在表格产品比较多，想要全部插入图片批注的情况下，手动一个个插入的方法就不可取了。我们说了，只要思想不滑坡 办法总比困难多。这时，我们就要考虑更高效的办法，比如：批量插入图片批注。关键如何实现？用VBA代码就可以实现
这就是今天我要跟大家分享的主题：excel用VBA代码实现单元格批量插入图片批注。
具体操作方法，如下：
一、准备产品图片
1、先准备好要插入单元格批注的产品图片，将其放在同一个文件夹下，并确保图片名称和表格中的产品名称一样对应；
2、将存放产品图片的文件夹放在跟准备插入批注的excel文件同一目录下面，如下：
二、添加VBA代码
1、打开excel文件，右键工作表标签—【查看代码】；
2、在打开的VBA窗口中，输入代码，如下图，然后关闭VBA窗口。
附上批量插入图片批注的代码：
Sub 批量添加图片批注()
For Each cell In Selection '循环要插入批注的单元格
pics = ThisWorkbook.Path & "\产品图片\" & cell.Value & ".jpg" '图片存放地址
cell.ClearComments '先清空批注
With cell.AddComment '为区域添加批注
On Error Resume Next
.Shape.Fill.UserPicture picturefile:=pics '插入图片
.Shape.Height = 50 '设置图片高度
.Shape.Width = 100 '设置图片宽度
End With
Next cell
End Sub
三、运行宏
1、鼠标选择要插入批注的所有单元格，点击【开发工具】的【宏】按钮；
2、在弹出的的【宏】窗口中，点击【执行】，如下：
这时，可以看到，表格里的产品都插入了图片批注。
强调说明：
1、要插入批注的图片名称一定要与表格内的产品名称保持一致，否则匹配不到。
2、放图片的文件夹一定要与表格放在同一个目录下。
3、Excel文件要启用宏，才能运行。有些默认设置，宏没有启用，可以按照以下方法启用：
【文件】—【选项】—【信任中心】—【信任中心设置】—【宏设置】—【启用所有宏】。
4、如果excel菜单没有【开发工具】，需要先设置，方法如下：【文件】—【选项】—【自定义功能区】，将右侧的【开发工具】选项打勾，就可以了。
举报/反馈
0
0
收藏
分享
