如何在 Excel 中為特定圖形新增滑鼠懸停提示？

作者Siluvia修改日期2025-10-30

在使用 Excel 時，通常會將巨集指派給圖形，打造只需輕點一下就能執行特定動作的互動式元素。然而，隨著工作表日益複雜，要記住每個圖形的用途或功能可能變得越來越困難——尤其是當這些圖形扮演不同角色或經常更新時。透過為圖形新增滑鼠懸停提示（螢幕提示），您就能在使用者瀏覽工作表時，即時提供清晰的提醒與額外資訊，大幅提升可用性與理解度。本指南將逐步介紹兩種在 Excel 中為圖形新增滑鼠懸停提示的實用方法：運用超連結與套用 VBA 程式碼。根據您的工作表結構、安全性考量及自動化需求，這兩種策略各具優勢，助您靈活選擇最適合的方案。

透過新增超連結為特定圖形新增滑鼠懸停提示
 透過 VBA 程式碼為特定圖形新增滑鼠懸停提示

透過新增超連結為特定圖形新增滑鼠懸停提示

為工作表中的圖形快速添加滑鼠懸停提示，最簡便的方法就是將超連結與圖形關聯，並設定螢幕提示訊息。此方法無需任何程式設計，適合想立即運用內建功能的使用者。

若要使用此方法新增滑鼠懸停提示，請依照下列步驟操作：

1. 找到您要附加滑鼠懸停提示的圖形，按右鍵，在下拉式選單中選取超連結，即可插入超連結，如下圖所示：

右鍵點擊圖形，然後點擊超連結

2. 在出現的創建超鏈接對話方塊中，點選右上角的螢幕提示按鈕，即可開啟設置超連結屏幕提示視窗。您可在其中輸入滑鼠懸停於圖形上時要顯示的文字——請務必填寫簡潔且具描述性的內容，讓使用者一眼掌握圖形功能！輸入完畢後，點選確定即可關閉對話方塊。如下圖所示：

在「插入超連結」對話框中輸入螢幕提示文字

3. 回到創建超鏈接視窗後，按一下書籤按鈕。在選取文件中的位置對話方塊中，於儲存格參照欄位輸入 A1——即可將圖形連結至 A1 儲存格，您也可依需求改用其他參照或保留現有位址。按一下確定以確認設定。

點擊書籤，在文字方塊中輸入 A1

4. 最後，在創建超鏈接對話方塊中按一下確定按鈕，即可完成超連結建立並儲存您的螢幕提示。

現在，只要將滑鼠指標移至圖形上方（無需點擊），系統便會自動顯示您設定的螢幕提示，提供快速參考，特別適用於工作表中包含多個圖形或動作的情況。

將滑鼠游標懸停在圖形上時顯示的螢幕提示

一些實用注意事項：

螢幕提示僅在滑鼠懸停於圖形上時顯示，點擊時不會出現。若您需要透過點擊觸發訊息，請改用其他方法。
在圖形上按右鍵並重新開啟超連結對話方塊後，您即可隨時編輯或移除螢幕提示。
若您的圖形已指派巨集，請務必確認新增的超連結不會覆寫或干擾該巨集所綁定的按一下動作。

透過 KUTOOLS AI 解鎖 Excel 的神奇功能

智慧執行：透過簡易指令，輕鬆執行儲存格操作、分析資料，並建立圖表！
自訂公式：打造專屬公式，讓您的工作流程更順暢！
VBA 編碼：輕鬆撰寫並套用 VBA 程式碼，立即提升工作效率！
公式解析：輕鬆掌握複雜公式！
文字翻譯：輕鬆打破試算表中的語言隔閡！

運用 AI 驅動的工具強化您的 Excel 能力。立即下載體驗前所未有的高效！

透過 VBA 程式碼為特定圖形新增滑鼠懸停提示

當您需要動態控制螢幕提示、使用更長或更豐富的提示文字，或希望滑鼠懸停訊息能自動更新時，可透過 VBA 程式碼實現。此方法適用於提示內容需根據儲存格值、使用者輸入或特定互動即時調整的情境，前提是您的活頁簿安全性設定允許執行 VBA 巨集。此外，這也十分適合追求更高彈性的進階使用者。

請依照下列指示，使用 VBA 為圖形新增滑鼠懸停提示：

1. 開啟包含您要增強滑鼠懸停提示之圖形的 Excel 工作表。接著，在底部的工作表標籤上按右鍵，從內容功能表中選取檢視程式碼，即可開啟 Microsoft Visual Basic for Applications 編輯器視窗。

2. 在 VBA 編輯器中，將下方提供的第一段 VBA 程式碼複製並貼上至對應工作表物件的程式碼視窗中。此程式碼通常用於定義圖形提示的行為，並處理滑鼠互動。

VBA 程式碼 1：為特定圖形新增滑鼠懸停提示

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'Updated by Extendoffice 2018/3/30
    If Target.Address = Range("A1").Address Then
        Call MoveRow
    End If
End Sub

3. 接著，在 VBA 編輯器中按一下插入> 模組，即可建立一個新模組，讓您貼上下方列出的第二段 VBA 程式碼。此程式碼通常用於為您的圖形新增或設定實際的螢幕提示。

VBA 程式碼 2：為特定圖形新增滑鼠懸停提示

Sub Text()
'Updated by Extendoffice 2018/3/30
    Dim xShape As Shape
    Dim xRg As Range
    On Error Resume Next
    Application.EnableEvents = False
    Set xShape = ActiveSheet.Shapes("Rectangle 4")
    If Not xShape Is Nothing Then
        ActiveSheet.Hyperlinks.Add xShape, "", "A1", ScreenTip:="Click to run Macro "
    End If
    If ActiveSheet.Hyperlinks(1).SubAddress = "A1" Then
        Call MoveRow
    End If
    Application.EnableEvents = True
End Sub

將 VBA 程式碼複製並貼上到模組中

此技巧的重要注意事項與提示：

1）。請務必將按一下以執行巨集與 Rectangle 4 替換為您自己的螢幕提示文字及工作表中相關圖形的名稱。您可以透過選取圖形並查看名稱方塊（位於 A 欄上方），或按右鍵檢視屬性來找到圖形名稱。

2）。在程式碼行 Call MoveRow 中，將 MoveRow 替換為您指派至目標圖形所使用的巨集實際名稱。

3. 若要執行程式碼，只需在 VBA 模組視窗中按下 F5 鍵，指定的滑鼠懸停提示將立即套用至所選圖形。

最佳 Office 生產力工具

🤖	KUTOOLS AI 助手：基於以下內容徹底革新數據分析：智慧執行｜產生程式碼｜建立自訂公式｜分析資料並產生圖表｜呼叫增強函數……
	熱門功能：尋找、醒目提示或標記重複值｜刪除空白行｜合併列或儲存格而不遺失資料｜不使用公式的四捨五入……
	高級 LOOKUP：多重條件 VLookup ｜多重數值 VLookup ｜跨多個工作表 VLookup ｜模糊查找……
	高級下拉列表：快速建立下拉式清單｜相依式下拉式清單｜多選下拉式清單……
	欄位管理員：新增指定數量的欄位｜移動欄位｜切換隱藏欄位的可見狀態｜比較範圍與欄位……
	精選功能：網格聚焦｜設計視圖｜增強編輯欄｜工作簿與工作表管理員｜資源庫（自動文字）｜日期提取｜合併工作表｜加密／解密儲存格｜依清單傳送電子郵件｜超級篩選｜特殊篩選（篩選粗體儲存格／斜體／刪除線……） ......
	頂尖 15 工具組：12 文字工具（添加文本，刪除特定字符，……）｜ 50+ 圖表類型（甘特圖，……）｜ 40+ 實用公式（基於生日計算年齡，……）｜ 19 插入工具（插入二維碼，從路徑插入圖片，……）｜ 12 轉換工具（金額轉大寫，匯率轉換，……）｜ 7 合併和拆分工具（高級合併行，分割儲存格，……）｜……以及更多