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