วิธีเลื่อนแผ่นงานที่ระบุหรือแผ่นงานทั้งหมดไปด้านบนใน Excel
บทความนี้จะแสดงวิธีการเลื่อนแผ่นงานที่ระบุหรือแผ่นงานทั้งหมดไปที่แถวบนสุดของสมุดงานใน Excel
เลื่อนแผ่นงานที่ระบุหรือแผ่นงานทั้งหมดไปด้านบนด้วยรหัส VBA
เลื่อนแผ่นงานที่ระบุหรือแผ่นงานทั้งหมดไปด้านบนด้วยรหัส VBA
หากต้องการเลื่อนแผ่นงานที่ระบุหรือแผ่นงานทั้งหมดไปที่แถวบนสุดใน Excel โปรดทำดังนี้
1. ในแผ่นงานคุณต้องเลื่อนขึ้นไปด้านบนโปรดกดปุ่ม อื่น ๆ + F11 คีย์เพื่อเปิด Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง
2 ใน Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่างคลิก สิ่งที่ใส่เข้าไป > โมดูล. จากนั้นคัดลอกและวางรหัส VBA ลงในหน้าต่างรหัส
รหัส VBA: เลื่อนแผ่นงานที่ระบุไปด้านบน
Sub ScrollToTop()
ActiveWindow.ScrollRow = 1
End Sub
สำหรับการเลื่อนแผ่นงานทั้งหมดไปด้านบนสุดในสมุดงานปัจจุบันโปรดใช้รหัส VBA ต่อไปนี้
รหัส VBA: เลื่อนแผ่นงานทั้งหมดไปด้านบน
Sub Select_A1_On_Activeworkbook()
Dim xSheet As Worksheet
For Each xSheet In ActiveWorkbook.Sheets
xSheet.Activate
ActiveSheet.Range("A1").Select
Next
ActiveWorkbook.Worksheets(1).Activate
End Sub
3. หลังจากป้อนรหัส VBA ลงในหน้าต่างรหัสโปรดกดปุ่ม F5 กุญแจสำคัญในการเรียกใช้รหัส
จากนั้นแผ่นงานที่ใช้งานอยู่หรือแผ่นงานทั้งหมดในสมุดงานปัจจุบันจะเลื่อนไปด้านบนทันที
สุดยอดเครื่องมือเพิ่มผลผลิตในสำนักงาน
เสริมทักษะ Excel ของคุณด้วย Kutools for Excelและสัมผัสประสิทธิภาพอย่างที่ไม่เคยมีมาก่อน Kutools for Excel เสนอคุณสมบัติขั้นสูงมากกว่า 300 รายการเพื่อเพิ่มประสิทธิภาพและประหยัดเวลา คลิกที่นี่เพื่อรับคุณสมบัติที่คุณต้องการมากที่สุด...
Office Tab นำอินเทอร์เฟซแบบแท็บมาสู่ Office และทำให้งานของคุณง่ายขึ้นมาก
- เปิดใช้งานการแก้ไขและอ่านแบบแท็บใน Word, Excel, PowerPoint, ผู้จัดพิมพ์, Access, Visio และโครงการ
- เปิดและสร้างเอกสารหลายรายการในแท็บใหม่ของหน้าต่างเดียวกันแทนที่จะเป็นในหน้าต่างใหม่
- เพิ่มประสิทธิภาพการทำงานของคุณ 50% และลดการคลิกเมาส์หลายร้อยครั้งให้คุณทุกวัน!
