การให้ vba code ทำการเลื่อนแผ่นงานและหยุดโดยการคลิกเม้าส์

[spuangchang]

เรียน ท่านอาจารย์ที่เคารพอย่างสูง
หลังจากที่ได้รับความกรุณาจากท่านอาจารย์และสมาชิกได้ช่วยกรุณาให้ความรู้จนสามารถนำไปจัดทำระบบสารสนเทศในสถานศึกษา โดยการจัดทำระบบข้อมูลนักเรียน และการจัดทำบัญชีวันลาที่สามารถคำนวณได้ทั้งวันลาตามปีงบประมาณและวันลาตามปีปฏิทิน นับว่าได้รับประโยชน์เป็นอย่างยิ่ง ขอรบกวนสอบถามท่านอาจารย์เกี่ยวกับวิธีการที่จะใช้คำสั่ง vba code เพื่อเลื่อนแผ่นงาน excel ที่ยาวมากเพื่อกรอกข้อมูลเวลามาเรียน โดยให้เลื่อนแผ่นงานโดยการคลิกเม้าส์แต่ละครั้งจะเลื่อนแผ่นงาน 1 ครั้ง แล้วหยุด สลับกันไป ได้ลองทำแล้วปรากฏว่าแเวลาคลิกเม้าส์ที่ปุ่ม กำหนดมาโคร แล้ว จะเลื่อนไปจนสุดในครั้งเดียว จะใช้คำสั่งใดเพื่อหยุดเลื่อนแผ่นงานเป็นช่วงๆ ได้ครับ

[snasui]

การเลื่อนไปขวาไปซ้ายทีละหน้าดูตัวอย่าง Code ด้านล่างครับ

Code: Select all

Sub Macro1()
    ActiveWindow.LargeScroll ToRight:=1
End Sub

Sub Macro2()
    ActiveWindow.LargeScroll Toleft:=1
End Sub

[spuangchang]

ขอบพระคุณท่านอาจารย์มากครับ