วิธีแทรกตารางลอยหรือกล่องข้อความในแผ่นงาน Excel

หากคุณมีตารางหรือกล่องข้อความที่มีข้อมูลสำคัญบางอย่างซึ่งคุณต้องการให้มองเห็นได้เสมอบนหน้าจอแผ่นงานแม้ว่าคุณจะเลื่อนขึ้นหรือลงในแผ่นงานก็ตาม นี่อาจเป็นงานที่น่าสนใจบทความนี้ฉันจะแนะนำเคล็ดลับง่ายๆในการแก้ปัญหา

แทรกตารางลอยใน Excel ด้วยรหัส VBA

แทรกกล่องข้อความลอยใน Excel ด้วยรหัส VBA

แทรกตารางลอยใน Excel ด้วยรหัส VBA

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

1. เลือกตารางข้อมูลที่คุณต้องการให้มองเห็นได้จากนั้นคลิก คัดลอก > คัดลอกเป็นรูปภาพ ภายใต้ หน้าแรก ดูภาพหน้าจอ:

2. ในการโผล่ออกมา คัดลอกรูปภาพ ใหเลือก ตามที่แสดงบนหน้าจอ จาก ลักษณะ และเลือก ภาพ ภายใต้ รูปแบบ คลิกที่ OK เพื่อปิดกล่องโต้ตอบจากนั้นคลิกเซลล์เพื่อส่งออกรูปภาพในที่สุดให้กด Ctrl + V เพื่อวางภาพนี้ดูภาพหน้าจอ:

3. หลังจากแปลงตารางเป็นรูปภาพแล้วให้คลิกขวาที่แท็บแผ่นงานซึ่งมีรูปภาพตารางที่คุณต้องการให้มองเห็นได้ตลอดเวลาแล้วเลือก ดูรหัส จากเมนูบริบทและในเปิด Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่างคัดลอกและวางรหัสต่อไปนี้ลงในโมดูลเปล่า:

รหัส VBA: แทรกตารางลอยใน excel:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'Updateby Extendoffice
    Application.ScreenUpdating = False
    If Target.Cells.Count > 1 Then Exit Sub
        With ActiveSheet.Shapes("Picture1")
            .Top = ActiveWindow.VisibleRange.Top + 5
            .Left = ActiveWindow.VisibleRange.Left + ActiveWindow.VisibleRange.Width - .Width - 45
        End With
    Application.ScreenUpdating = False
End Sub

หมายเหตุ: ในรหัสนี้ไฟล์ ภาพที่ 1 คือชื่อภาพที่คุณสร้างขึ้นโปรดเปลี่ยนตามความต้องการของคุณ

4. จากนั้นบันทึกและปิดหน้าต่างรหัสตอนนี้เมื่อคุณเลื่อนแผ่นงานและคลิกเซลล์รูปภาพตารางจะถูกเก็บไว้ที่มุมขวาบนของแผ่นงานเสมอ

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

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

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

แทรกกล่องข้อความลอยใน Excel ด้วยรหัส VBA

หากต้องการแทรกกล่องข้อความแบบลอยนี่คือรหัส VBA เพื่อแก้ปัญหานี้

1. ขั้นแรกคุณควรแทรกกล่องข้อความจากไฟล์ ผู้พัฒนา คลิกแท็บ ผู้พัฒนา > สิ่งที่ใส่เข้าไป > กล่องข้อความ (ตัวควบคุม ActiveX)จากนั้นวาดกล่องข้อความและป้อนข้อมูลลงในกล่องข้อความตามที่คุณต้องการ ดูภาพหน้าจอ:

2. จากนั้นคลิกขวาที่แท็บแผ่นงานซึ่งมีกล่องข้อความที่คุณต้องการให้มองเห็นได้ตลอดเวลาและเลือก ดูรหัส จากเมนูบริบทและในเปิด Microsoft Visual Basic สำหรับแอปพลิเคชัน คัดลอกและวางรหัสต่อไปนี้ลงในช่องว่าง โมดูล:

รหัส VBA: แทรกกล่องข้อความลอยใน Excel:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'Updateby Extendoffice
    Application.ScreenUpdating = False
    With ActiveWindow.VisibleRange
        TextBox1.Top = .Top + 5
        TextBox1.Left = .Left + .Width - TextBox1.Width - 45
    End With
    Application.ScreenUpdating = True
End Sub

หมายเหตุ: ในรหัสนี้ไฟล์ กล่องข้อความ 1 คือชื่อกล่องข้อความที่คุณใส่ไว้โปรดเปลี่ยนตามความต้องการของคุณ

3. จากนั้นบันทึกและปิดหน้าต่างรหัสตอนนี้เมื่อคุณเลื่อนแผ่นงานไปที่ใดก็ได้กล่องข้อความที่แทรกจะถูกเก็บไว้ที่มุมขวาบนของแผ่นงานเสมอ