有時候,為了製作資訊量大又簡潔的表格,我們需要為Excel表格的單元格新增可隱藏的圖片,並且當滑鼠指向單元格,就自動顯示圖片,移開則不顯示,這個鼠觸互動效果是不是很酷?
方法/步驟
要實現Excel表格中滑鼠指向單元格就出現相關圖片的互動效果,只要通過Excel2007的新增圖片批註功能就可以輕鬆做到。
下面,我們以製作產品列表為例,展示具體的新增圖片方法。
滑鼠指向單元格,自動顯示預設圖片
單個新增圖片
右擊目標單元格,選擇“新增批註”,刪除批註輸入框中所有文字,接著滑鼠移動到批註輸入框的邊線,當指標變成十字箭頭時,單擊滑鼠右鍵選擇“設定批註格式”→“顏色與線條” →“填充效果”→“圖片”,再單擊“選擇圖片”新增圖片即可。
現在滑鼠指向目標單元格即可顯示圖片,移開滑鼠圖片就會自動隱藏。如果滑鼠移開時圖片沒有自動消失,可單擊Excel視窗左上角的“Office”,在彈出的選單中單擊“Excel選項”,在“Excel選項”視窗左側選擇“高階”,在右側選擇 “僅顯示標誌符,懸停時加顯批註”,確定後圖片即可自動隱藏了。
批量新增圖片
如果有許多單元格要新增圖片批註,逐一設定就很麻煩。我們可以通過巨集批量設定圖片批註。
先把需要用到的圖片檔案全部集中到一個資料夾中(例:F:\產品圖),各圖片名稱必須與表格中相應產品名一致,以“產品名.jpg”這樣的格式命名,例如昂達VX545HD.jpg、昂達VX757.jpg等等。此外,所有圖片的高寬比例也應該一致,這樣才能確保統一設定後顯示的圖片不變形。
然後,在Excel2007中開啟工作簿,按下組合鍵“Alt+F8”開啟巨集視窗,輸入巨集名為“新增圖片批註”,單擊“建立”按鈕,在開啟的VBA視窗中編輯程式碼。
程式碼片段:
Sub 新增圖片批註()
Dim 單元格
On Error Resume Next
For Each 單元格 In Selection
單元格.AddComment
單元格.Comment.Shape.Fill.UserPicture "F:\產品圖\" & 單元格.Value & ".jpg"
單元格.Comment.Shape.Height = 120
單元格.Comment.Shape.Width = 200
Next 單元格
End Sub
最後,關閉VBA視窗,把檔案另存為“Excel啟用巨集的工作簿”格式的文件。現在你只要選中要設定的所有單元格,例如A4:A20,按下組合鍵“Alt+F8”開啟巨集視窗,雙擊列表中的“新增圖片批註”執行巨集,即可批量為單元格新增圖片了。
(注:圖片在設定後會直接儲存在工作簿中)。如果表格中的產品名改變了,或用於批註的圖片檔案更換了,你只要再執行一下“新增圖片批註”巨集重新整理即可。