一個產品目錄表，有產品編號列，如果能向每個產品添加一個圖片來展示產品的外觀樣式就很完美了。

　　比如，下圖就是使用excel的批注制作的圖片提示。

　　給單元格添加一個彈出圖片，當鼠標懸停在某個產品的單元格上時，會自動顯示出這種產品的圖片，按以下步驟操作就可以為單元格添加批注圖片。

　　第一步，選中需要添加批注圖片的單元格，選擇“插入”——“批注”。

　　第二步，用鼠標在點線框上單擊右鍵，從彈出的菜單中選擇 “設置批注格式”對話框，選擇“顏色和線條”選項卡，從“填充”欄的“顏色”項的下拉列表中選擇“填充效果”項，隨后可以打開“填充效果”對話框，選擇“圖片”選項卡，單擊其中的“選擇圖片”按鈕，選擇要放在批注中的圖片，然后連續單擊“確定”按鈕，回到Excel編輯狀態，就可以看到選擇的圖片已經添加到批注中了。

　　通過以上操作就完成了在一個單元格添加批注圖片了。上面的方法適合于給少量單元格添加圖片批注，如果需要快速給多個單元格添加圖片批注，又該如何操作呢?

　　如果有許多單元格都要添加圖片批注，可以用VBA代碼來快速進行，其步驟如下介紹：

　　第一步，準備圖片

　　將需要添加為批注的圖片全部復制到某個文件夾中，并以“產品名稱.jpg”來命名。如“三星SGH-F258.jpg”、“三星SGH-F700.jpg”等。

　　第二步，在單元格中輸入產品名稱，如“三星SGH-F258”、“三星SGH-F700”等，名稱必需和圖片名稱相對應。

　　第三步，按下ALT+F11鍵，在VBA代碼編輯器中輸入下面代碼：

　　Sub AddABunch()

　　For Each cell In Selection

　　Pics= "h:\pic\" & cell.Value & ".jpg"

　　With cell.AddComment

　　.Shape.Fill.UserPicture PictureFile:=Pics

　　.Shape.Height = 100

　　.Shape.Width = 100

　　End With

　　Next cell

　　End Sub

　　說明：其中“h:\pic\”為圖片所在文件夾，“ .Shape.Height = 100”指定批注圖片的高度， “.Shape.Width = 100”指定批注的寬度，大家在實際使用時請根據自己實際情況進行修改。

　　第四步，選擇所有包含產品名稱的單元格，運行上述代碼，即允許宏，即可為所有選中的單元格添加相應的圖片批注。

　　說明：如果要重新添加圖片批注，必需先刪除所有批注后再次運行VBA代碼。方法是選擇所有包含產品名稱的單元格，鼠標右擊，在彈出的快捷菜單中選擇“刪除批注”即可。

　　運行上面的代碼就可以快速的給多個單元格添加圖片批注，有需要的朋友，可以自己動手試試。