excel 中如何為單元格添加批注彈出圖片的辦法案例圖文教程

一個(gè)產(chǎn)品目錄表，有產(chǎn)品編號(hào)列，如果能向每個(gè)產(chǎn)品添加一個(gè)圖片來展示產(chǎn)品的外觀樣式就很完美了。

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

　　給單元格添加一個(gè)彈出圖片，當(dāng)鼠標(biāo)懸停在某個(gè)產(chǎn)品的單元格上時(shí)，會(huì)自動(dòng)顯示出這種產(chǎn)品的圖片，按以下步驟操作就可以為單元格添加批注圖片。

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

　　第二步，用鼠標(biāo)在點(diǎn)線框上單擊右鍵，從彈出的菜單中選擇 “設(shè)置批注格式”對(duì)話框，選擇“顏色和線條”選項(xiàng)卡，從“填充”欄的“顏色”項(xiàng)的下拉列表中選擇“填充效果”項(xiàng)，隨后可以打開“填充效果”對(duì)話框，選擇“圖片”選項(xiàng)卡，單擊其中的“選擇圖片”按鈕，選擇要放在批注中的圖片，然后連續(xù)單擊“確定”按鈕，回到Excel編輯狀態(tài)，就可以看到選擇的圖片已經(jīng)添加到批注中了。

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

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

　　第一步，準(zhǔn)備圖片

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

　　第二步，在單元格中輸入產(chǎn)品名稱，如“三星SGH-F258”、“三星SGH-F700”等，名稱必需和圖片名稱相對(duì)應(yīng)。

　　第三步，按下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”指定批注的寬度，大家在實(shí)際使用時(shí)請(qǐng)根據(jù)自己實(shí)際情況進(jìn)行修改。

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

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

　　運(yùn)行上面的代碼就可以快速的給多個(gè)單元格添加圖片批注，有需要的朋友，可以自己動(dòng)手試試。