「Excel技巧」Excel单元格批量插入图片批注,VBA法一秒搞定

哈喽,大家好。上一篇文章跟大家介绍的是excel单元格如何手动插入图片批注。但是在表格产品比较多,想要全部插入图片批注的情况下,手动一个个插入的方法就不可取了。我们说了,只要思想不滑坡 办法总比困难多。这时,我们就要考虑更高效的办法,比如:批量插入图片批注。关键如何实现?用VBA代码就可以实现

这就是今天我要跟大家分享的主题:excel用VBA代码实现单元格批量插入图片批注。

具体操作方法,如下:

一、准备产品图片

1、先准备好要插入单元格批注的产品图片,将其放在同一个文件夹下,并确保图片名称和表格中的产品名称一样对应;

「Excel技巧」Excel单元格批量插入图片批注,VBA法一秒搞定

2、将存放产品图片的文件夹放在跟准备插入批注的excel文件同一目录下面,如下:

「Excel技巧」Excel单元格批量插入图片批注,VBA法一秒搞定


二、添加VBA代码

1、打开excel文件,右键工作表标签—【查看代码】;

「Excel技巧」Excel单元格批量插入图片批注,VBA法一秒搞定

2、在打开的VBA窗口中,输入代码,如下图,然后关闭VBA窗口。

「Excel技巧」Excel单元格批量插入图片批注,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、鼠标选择要插入批注的所有单元格,点击【开发工具】的【宏】按钮;

「Excel技巧」Excel单元格批量插入图片批注,VBA法一秒搞定

2、在弹出的的【宏】窗口中,点击【执行】,如下:

「Excel技巧」Excel单元格批量插入图片批注,VBA法一秒搞定

这时,可以看到,表格里的产品都插入了图片批注。

「Excel技巧」Excel单元格批量插入图片批注,VBA法一秒搞定


强调说明:

1、要插入批注的图片名称一定要与表格内的产品名称保持一致,否则匹配不到。

2、放图片的文件夹一定要与表格放在同一个目录下。

3、Excel文件要启用宏,才能运行。有些默认设置,宏没有启用,可以按照以下方法启用:

【文件】—【选项】—【信任中心】—【信任中心设置】—【宏设置】—【启用所有宏】。

「Excel技巧」Excel单元格批量插入图片批注,VBA法一秒搞定

4、如果excel菜单没有【开发工具】,需要先设置,方法如下:【文件】—【选项】—【自定义功能区】,将右侧的【开发工具】选项打勾,就可以了。

「Excel技巧」Excel单元格批量插入图片批注,VBA法一秒搞定


分享到:


相關文章: