「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法一秒搞定


分享到:


相關文章: