จะใช้บานหน้าต่างตรึง / ยกเลิกการตรึงกับแผ่นงานหลายแผ่นพร้อมกันได้อย่างไร

สมมติว่าคุณมีสมุดงานขนาดใหญ่ซึ่งมีแผ่นงานหลายร้อยแผ่นและตอนนี้คุณจำเป็นต้องใช้ Freeze Panes เพื่อตรึงแผ่นงานทั้งหมดในครั้งเดียว ด้วยฟังก์ชัน Freeze Panes ของ Excel คุณสามารถตรึงแผ่นงานได้ทีละแผ่นเท่านั้นมีวิธีการตรึงหรือยกเลิกการตรึงแผ่นงานทั้งหมดในทันทีใน Excel หรือไม่

ใช้ Freeze Panes กับแผ่นงานทั้งหมดพร้อมกันด้วยรหัส VBA

ใช้ Unfreeze Panes กับแผ่นงานทั้งหมดพร้อมกันด้วยรหัส VBA

ใช้ Freeze / Unfreeze Panes กับแผ่นงานทั้งหมดพร้อมกันด้วยการคลิกเพียงครั้งเดียวด้วย Kutools for Excel

ใช้ Freeze Panes กับแผ่นงานทั้งหมดพร้อมกันด้วยรหัส VBA

คุณสามารถใช้รหัสต่อไปนี้เพื่อใช้ Freeze Panes กับแผ่นงานทั้งหมดโปรดทำตามขั้นตอนต่อไปนี้:

1. ถ้าคุณต้องการตรึงแผ่นงานทั้งหมดไว้ในตำแหน่งเดียวกันให้เลือกเซลล์ที่คุณต้องการตรึงในแผ่นงานจากนั้นกดค้างไว้ เปลี่ยน เพื่อเลือกแท็บแผ่นงานทั้งหมด

2. กด ALT + F11 และจะเปิดไฟล์ หน้าต่าง Microsoft Visual Basic for Applications.

3. คลิก สิ่งที่ใส่เข้าไป > โมดูลและวางรหัสต่อไปนี้ในไฟล์ หน้าต่างโมดูล.

รหัส VBA: ตรึงแผ่นงานทั้งหมดพร้อมกันใน Excel

Sub Freeze()
'Updateby Extendoffice
Dim Ws As Worksheet
Application.ScreenUpdating = False
For Each Ws In Application.ActiveWorkbook.Worksheets
    Ws.Activate
    With Application.ActiveWindow
        .FreezePanes = True
    End With
Next
Application.ScreenUpdating = True
End Sub

4. จากนั้นกด F5 คีย์เพื่อเรียกใช้รหัสนี้และแผ่นงานทั้งหมดถูกนำไปใช้กับบานหน้าต่างตรึงในตำแหน่งเดียวกัน

หมายเหตุ หากไม่ได้เลือกแผ่นงานทั้งหมดและเซลล์ที่ใช้งานอยู่ของแผ่นงานแต่ละแผ่นจะอยู่ในตำแหน่งที่ต่างกันบานหน้าต่างตรึงจะอยู่ในตำแหน่งต่างๆเมื่อเซลล์ที่ใช้งานอยู่บน

ใช้ Unfreeze Panes กับแผ่นงานทั้งหมดพร้อมกันด้วยรหัส VBA

หากมีการใช้แผ่นงานหลายแผ่นกับบานหน้าต่างตรึงใน Excel ของคุณคุณจะยกเลิกการตรึงทีละแผ่นได้อย่างไรยกเว้นการยกเลิกการตรึงทีละแผ่น

1. เปิดสมุดงานของคุณที่ใช้แผ่นงานกับบานหน้าต่างตรึง

2. กด ALT + F11 และจะเปิดไฟล์ หน้าต่าง Microsoft Visual Basic for Applications.

3. คลิก สิ่งที่ใส่เข้าไป > โมดูลและวางรหัสต่อไปนี้ในไฟล์ หน้าต่างโมดูล.

รหัส VBA: เลิกตรึงแผ่นงานทั้งหมดพร้อมกันใน Excel

Sub UnFreeze()
'Updateby Extendoffice
Dim Ws As Worksheet
Application.ScreenUpdating = False
For Each Ws In Application.ActiveWorkbook.Worksheets
    Ws.Activate
    With Application.ActiveWindow
        .FreezePanes = False
    End With
Next
Application.ScreenUpdating = True
End Sub

4. จากนั้นกด F5 กุญแจสำคัญในการเรียกใช้รหัสนี้และแผ่นงานทั้งหมดที่ใช้กับบานหน้าต่างตรึงจะถูกยกเลิกในครั้งเดียว

ใช้ Freeze / Unfreeze Panes กับแผ่นงานทั้งหมดพร้อมกันด้วยการคลิกเพียงครั้งเดียวด้วย Kutools for Excel

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

หลังจากการติดตั้ง Kutools สำหรับ Excelโปรดทำตามนี้:

1. เลือกเซลล์ที่คุณต้องการใช้บานหน้าต่างตรึงสำหรับแผ่นงานทั้งหมดในกรณีนี้ฉันคลิกเซลล์ B2 ดูภาพหน้าจอ:

2. จากนั้นคลิก Kutools พลัส > แผ่นงาน > ตรึงบานหน้าต่างหลายแผ่นดูภาพหน้าจอ:

3. จากนั้นแผ่นงานทั้งหมดของคุณจะถูกนำไปใช้กับบานหน้าต่างตรึงในตำแหน่งเดียวกันของเซลล์ B2

หมายเหตุ: หากคุณต้องการยกเลิกการตรึงทันทีคุณเพียงแค่ต้องใช้คุณสมบัติ Unfreeze บานหน้าต่างหลายแผ่นโดยคลิก Kutools พลัส> แผ่นงาน > คลายการตรึงบานหน้าต่างหลายแผ่น.

ดาวน์โหลดและทดลองใช้ Kutools for Excel ฟรีทันที!

Demo: ใช้ Freeze / Unfreeze Panes กับแผ่นงานทั้งหมดพร้อมกันด้วยการคลิกเพียงครั้งเดียวด้วย Kutools for Excel