วิธีตั้งค่าลำดับแท็บของเซลล์หรือเซลล์ที่ปลดล็อคใน Excel
สมมติว่าคุณต้องตั้งค่าลำดับแท็บสำหรับเซลล์ที่คุณกำหนด เช่น กดแป้น Tab เพื่อย้ายจากเซลล์ B5 ไปยัง C6 จาก C6 ไปที่ D7 จาก D7 เป็น E8 จากนั้นให้กลับไปที่ B5 เมื่อออกจากเซลล์ E8 ในเวิร์กชีต ดังภาพหน้าจอด้านล่างที่แสดง จะบรรลุเป้าหมายได้อย่างไร? บทความนี้มีวิธีการ VBA สำหรับคุณ
ตั้งค่าลำดับแท็บของเซลล์หรือเซลล์ที่ปลดล็อคด้วยรหัส VBA
ตั้งค่าลำดับแท็บของเซลล์หรือเซลล์ที่ปลดล็อคด้วยรหัส VBA
โปรดเรียกใช้วิธี VBA ด้านล่างเพื่อตั้งค่าลำดับแท็บของเซลล์ในแผ่นงานปกติหรือเซลล์ที่ปลดล็อคในแผ่นงานที่มีการป้องกัน
1. ในแผ่นงานคุณต้องตั้งค่าลำดับแท็บคลิกขวาที่แท็บแผ่นงานแล้วคลิก ดูรหัส จากเมนูบริบท
2 ใน Microsoft Visual Basic สำหรับแอปพลิเคชัน คัดลอกและวางโค้ด VBA ด้านล่างลงในไฟล์ รหัส หน้าต่าง
รหัส VBA: ตั้งค่าลำดับแท็บของเซลล์หรือเซลล์ที่ปลดล็อค
Private Sub Worksheet_Change(ByVal Target As Range)
Dim tabArray As Variant
Dim i As Long
tabArray = Array("B5", "C6", "D7", "E8")
Application.ScreenUpdating = False
For i = LBound(tabArray) To UBound(tabArray)
If tabArray(i) = Target.Address(0, 0) Then
If i = UBound(tabArray) Then
Me.Range(tabArray(LBound(tabArray))).Select
Else
Me.Range(tabArray(i + 1)).Select
End If
End If
Next i
Application.ScreenUpdating = True
End Sub
หมายเหตุ / รายละเอียดเพิ่มเติม:
3 กด อื่น ๆ + Q ปุ่มเพื่อปิดไฟล์ Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง
จากนี้เป็นต้นไปหลังจากป้อนข้อมูลใน B5 เคอร์เซอร์จะไปที่ C6 โดยกดปุ่ม Tab หรือ Enter จากนั้นไปที่ D7 เมื่อออกจาก C6 จากนั้นย้ายไปที่ D7, E8 ในแผ่นงานปัจจุบัน
บทความที่เกี่ยวข้อง:
สุดยอดเครื่องมือเพิ่มผลผลิตในสำนักงาน
เพิ่มพูนทักษะ Excel ของคุณด้วย Kutools สำหรับ Excel และสัมผัสประสิทธิภาพอย่างที่ไม่เคยมีมาก่อน Kutools สำหรับ Excel เสนอคุณสมบัติขั้นสูงมากกว่า 300 รายการเพื่อเพิ่มประสิทธิภาพและประหยัดเวลา คลิกที่นี่เพื่อรับคุณสมบัติที่คุณต้องการมากที่สุด...
แท็บ Office นำอินเทอร์เฟซแบบแท็บมาที่ Office และทำให้งานของคุณง่ายขึ้นมาก
- เปิดใช้งานการแก้ไขและอ่านแบบแท็บใน Word, Excel, PowerPoint, ผู้จัดพิมพ์, Access, Visio และโครงการ
- เปิดและสร้างเอกสารหลายรายการในแท็บใหม่ของหน้าต่างเดียวกันแทนที่จะเป็นในหน้าต่างใหม่
- เพิ่มประสิทธิภาพการทำงานของคุณ 50% และลดการคลิกเมาส์หลายร้อยครั้งให้คุณทุกวัน!