「Excel技巧」用VBA法給單元格批量插入圖片批註

哈嘍，大家好。上一篇文章跟大家介紹的是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菜單沒有【開發工具】，需要先設置，方法如下：【文件】—【選項】—【自定義功能區】，將右側的【開發工具】選項打勾，就可以了。