●多個單元格批量添加批注圖片：
1、建立一個文件夾，里面放入Excel文件和圖片。
2、調(diào)整圖片名稱與Excel文件里面的相關(guān)單元格內(nèi)容名稱一致。
3、用VBA代碼編寫宏。打開Excel文件，⑴、 Alt+F11 打開VBA編輯窗口，插入--模塊，雙擊模塊彈出編寫代碼窗口；或⑵、 Alt+F8 打開宏窗口，輸入宏名稱如批量添加批注圖片--創(chuàng)建，彈出編寫代碼窗口，并自動顯示首末行代碼；將以下代碼全部復制進去：
Sub 批量添加批注圖片()
' 宏由hejun于2013年4月23日創(chuàng)立
' Dir函數(shù)批量獲取指定目錄下所有文件名和內(nèi)容
Dim 單元格
On Error Resume Next
For Each 單元格 In Selection
單元格.AddComment
單元格.Comment.Shape.Fill.UserPicture Dir(ActiveWorkbook.Path & "\" & 單元格.Value & ".jpg") '當前文件所在目錄下以當前單元內(nèi)容為名稱的.jpg圖片
單元格.Comment.Shape.Height = 90 '批注框的高
單元格.Comment.Shape.Width = 160 '批注框的寬
Next 單元格
End Sub
4、關(guān)閉編寫代碼窗口和VBA編輯窗口；選定Excel文件里面需要添加批注圖片的單元格（名稱與圖片名稱一致的區(qū)域），視圖--宏--查看宏，選中批量添加批注圖片宏--執(zhí)行，各圖片則批量添加到對應的單元格的批注中。鼠標移動到此單元格，則自動顯示批注的圖片。
5、保存包含宏的Excel文件。文件--另存為；或保存--選否（以包含宏，選是則不包含宏），彈出另存為窗口；在保存類型下拉框里選擇 Excel啟用宏的工作簿，ok。
6、打開包含宏的Excel文件再次編輯修改時，工作簿時工具欄下面會出現(xiàn)會出現(xiàn)帶有防護圖標和“啟用內(nèi)容”按鈕的黃色消息欄。您可以允許在當前工作簿中運行宏，否則不能使用宏。
本站僅提供存儲服務，所有內(nèi)容均由用戶發(fā)布，如發(fā)現(xiàn)有害或侵權(quán)內(nèi)容，請
點擊舉報。
