如何在Excel中將鼠標懸停在特定形狀上

發布:未知文本批量工具

如何在Excel中將鼠標懸停在特定形狀上？

在許多情況下，您需要將宏分配給某種形狀，以便在工作表中單擊它來運行宏。將宏分配給形狀后，將鼠標懸停在提示上可以幫助您提醒形狀將來使用。本文介紹了兩種在Excel中將鼠標懸停到特定形狀的方法。

通過添加超鏈接將鼠標懸停在提示上以達到特定形狀

使用VBA代碼將鼠標懸停在筆尖上達到特定形狀通過添加超鏈接將鼠標懸停在提示上以達到特定形狀驚人的！在 Excel 中使用高效的選項卡，如 Chrome、Firefox 和 Safari！每天節省50％的時間，并減少數千次鼠標單擊！

您可以使用ScreenTip將超鏈接添加到工作表中的特定形狀。請執行以下操作。

1.右鍵單擊您需要在鼠標上方添加鼠標的形狀，然后單擊 超鏈接 從右鍵單擊菜單中。看截圖：

2.在 插入超鏈接 對話框中，單擊 屏幕提示 按鈕。而在 設置超鏈接屏幕提示 對話框中，輸入在鼠標懸停在形狀上時需要顯示的屏幕提示文本。最后點擊 OK 按鈕。看截圖：

3.返回到 插入超鏈接 對話框中，單擊書簽按鈕。然后在“單元格引用”框中的“類型”中輸入A1 選擇放置在文檔中 對話框，最后單擊 OK 按鈕。

4。點擊 OK 按鈕在 插入超鏈接 對話框以完成超鏈接的創建。

現在，您可以看到鼠標懸停在形狀上方時顯示的屏幕提示。

使用VBA代碼將鼠標懸停在筆尖上達到特定形狀

運行以下VBA代碼后，您可以輕松地將鼠標懸停在尖端上的特定形狀。

1.打開工作表，其中包含將鼠標移至上方時顯示的形狀。右鍵單擊工作表選項卡，然后從上下文菜單中單擊“查看代碼”。

2.在 Microsoft Visual Basic應用程序 窗口，請將下面的VBA代碼復制到“代碼”窗口中。

VBA代碼1：將鼠標懸停在筆尖上達到特定形狀

Private Sub Worksheet_SelectionChange(ByVal Target As Range)Updated by Extendoffice 2018/3/30If Target.Address = Range("A1").Address ThenCall MoveRowEnd IfEnd SubCopy

3。點擊插頁 > 模塊。然后在“模塊”窗口中輸入以下VBA代碼。

VBA代碼2：將鼠標懸停在筆尖上達到特定形狀

Sub Text()Updated by Extendoffice 2018/3/30Dim xShape As ShapeDim xRg As RangeOn Error Resume NextApplication.EnableEvents = FalseSet xShape = ActiveSheet.Shapes("Rectangle 4")If Not xShape Is Nothing ThenActiveSheet.Hyperlinks.Add xShape, "", "A1", ScreenTip:="Click to run Macro "End IfIf ActiveSheet.Hyperlinks(1).SubAddress = "A1" ThenCall MoveRowEnd IfApplication.EnableEvents = TrueEnd SubCopy

1）。請替換“點擊運行宏“和”矩形4”與您的屏幕提示文字和特定形狀的名稱。2）。取代“移動行“ 排隊 ”致電MoveRow”（已分配給形狀的宏名稱）

3。按 F5 鍵來運行代碼。然后，將指定的屏幕提示立即添加到特定形狀。

相關文章:如何在Excel中基于/取決于指定的單元格值自動更改形狀大小？如何在Excel中使用透明背景色填充形狀？如何根據Excel中指定的單元格值隱藏或取消隱藏某個形狀？