วิธีเพิ่มปลายเมาส์ให้เป็นรูปร่างบางอย่างใน Excel

ในหลาย ๆ กรณีคุณต้องกำหนดมาโครให้กับรูปร่างที่แน่นอนเพื่อเรียกใช้แมโครโดยคลิกที่มันในแผ่นงานของคุณ หลังจากกำหนดมาโครให้กับรูปร่างแล้วการเพิ่มส่วนปลายของเมาส์จะช่วยเตือนให้คุณทราบว่ารูปร่างนั้นใช้ในอนาคตได้อย่างไร บทความนี้แสดงวิธีการสองวิธีในการเพิ่มปลายเมาส์ไปยังรูปร่างบางอย่างใน Excel

เพิ่มเมาส์เหนือปลายให้เป็นรูปร่างบางอย่างโดยเพิ่มไฮเปอร์ลิงก์
เพิ่มเมาส์เหนือปลายเป็นรูปร่างบางอย่างด้วยรหัส VBA

เพิ่มเมาส์เหนือปลายให้เป็นรูปร่างบางอย่างโดยเพิ่มไฮเปอร์ลิงก์

คุณสามารถเพิ่มไฮเปอร์ลิงก์ด้วยคำแนะนำบนหน้าจอให้กับรูปร่างบางอย่างในแผ่นงาน กรุณาดำเนินการดังนี้

1. คลิกขวาที่รูปร่างที่คุณต้องการเพิ่มเมาส์เหนือปลายแล้วคลิก เชื่อมโยงหลายมิติ จากเมนูคลิกขวา ดูภาพหน้าจอ:

2 ใน แทรกไฮเปอร์ลิงก์ ใหคลิกปุ the ม คำแนะนำบนหน้าจอ ปุ่ม. และใน ตั้งค่า Hyperlink ScreenTip กล่องโต้ตอบป้อนข้อความเคล็ดลับหน้าจอที่คุณต้องการแสดงในขณะที่วางเมาส์เหนือรูปร่าง สุดท้ายคลิกไฟล์ OK ปุ่ม. ดูภาพหน้าจอ:

3. เมื่อมันกลับไปที่ แทรกไฮเปอร์ลิงก์ ใหคลิกปุ the ม ที่คั่นหนังสือ ปุ่ม. จากนั้นป้อน A1 ลงในช่อง Type ในเซลล์อ้างอิงของไฟล์ เลือกวางในเอกสาร แล้วคลิกไฟล์ OK ปุ่ม

4 คลิกที่ OK ปุ่มใน แทรกไฮเปอร์ลิงก์ กล่องโต้ตอบเพื่อเสร็จสิ้นการสร้างไฮเปอร์ลิงก์

ตอนนี้คุณสามารถเห็นปลายหน้าจอที่แสดงเมื่อวางเมาส์เหนือรูปร่าง

ปลดล็อก Excel Magic ด้วย Kutools AI

• การดำเนินการอย่างชาญฉลาด: ดำเนินการกับเซลล์ วิเคราะห์ข้อมูล และสร้างแผนภูมิ ทั้งหมดนี้ขับเคลื่อนด้วยคำสั่งง่ายๆ
• สูตรที่กำหนดเอง: สร้างสูตรที่ปรับแต่งโดยเฉพาะเพื่อปรับปรุงขั้นตอนการทำงานของคุณ
• การเข้ารหัส VBA: เขียนและใช้งานโค้ด VBA ได้อย่างง่ายดาย
• การตีความสูตร: เข้าใจสูตรที่ซับซ้อนได้อย่างง่ายดาย
• การแปลข้อความ: ทลายกำแพงด้านภาษาภายในสเปรดชีตของคุณ

ปรับปรุงความสามารถ Excel ของคุณด้วยเครื่องมือที่ขับเคลื่อนด้วย AI ดาวน์โหลดเดี๋ยวนี้ และสัมผัสประสิทธิภาพอย่างที่ไม่เคยมีมาก่อน!

เพิ่มเมาส์เหนือปลายเป็นรูปร่างบางอย่างด้วยรหัส VBA

คุณสามารถเพิ่มปลายเมาส์ให้เป็นรูปร่างที่ต้องการได้อย่างง่ายดายหลังจากเรียกใช้รหัส VBA ต่อไปนี้

1. เปิดแผ่นงานที่มีรูปร่างที่คุณจะแสดงเคล็ดลับเมื่อเลื่อนเมาส์ไป คลิกขวาที่แท็บแผ่นงานจากนั้นคลิก View Code จากเมนูบริบท

2 ใน Microsoft Visual Basic สำหรับแอปพลิเคชัน โปรดคัดลอกรหัส 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 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

หมายเหตุ : :

3 กด F5 กุญแจสำคัญในการเรียกใช้รหัส จากนั้นปลายหน้าจอที่ระบุจะถูกเพิ่มลงในรูปร่างที่แน่นอนทันที

บทความที่เกี่ยวข้อง:

• วิธีเปลี่ยนขนาดรูปร่างโดยอัตโนมัติตาม / ขึ้นอยู่กับค่าเซลล์ที่ระบุใน Excel
• วิธีเติมรูปร่างด้วยสีพื้นหลังโปร่งใสใน Excel
• วิธีซ่อนหรือยกเลิกการซ่อนรูปร่างตามค่าเซลล์ที่ระบุใน Excel