用VBA代码来快速实现Excel批注图片批量添加，步骤如下：
1.准备图片
将需要添加为批注的图片全部复制到某个文件夹中，并以“名称.jpg”来命名。
2.在单元格中输入名称，名称必需和图片名称相对应。
3.用ALT+F11打开VBA编辑器中添加下面的代码：
Sub 添加图片批注()
On Error Resume Next Dim Cell As Range Dim Pics As String Dim ErrCell As String Selection.ClearComments For Each Cell In Selection
Pics = \E:\\图片文件夹\\\ & Cell.Value & \.jpg\ If Dir(Pics) = \
ErrCell = ErrCell & \ Else
With Cell.AddComment
.Shape.Fill.UserPicture PictureFile:=Pics .Shape.Height = 100 .Shape.Width = 100 End With End If Next
MsgBox \以下单元格没有图片哦！\End Sub
其中“E:\\图片文件夹\\”为图片所在文件夹，“ .Shape.Height = 100”指定批注图片的高度， “.Shape.Width = 100”指定批注的宽度，请根据实际情况进行更改。
4.选择所有包含名称的单元格，运行上述代码（用ALT+F8执行代码即可），即可为所有选中的单元格添加相应的图片批注。
注意在选择产品名称所在单元格时，仅仅选择所需单元格，而不能选择其他单元格，特别是在这些单元格不连续时，否则会出错。
5.如果要重新添加图片批注，必需先删除所有批注后再次运行VBA代码。方法是选择所有包含产品名称的单元格，鼠标右击，在弹出的快捷菜单中选择“删除批注”即可。