Excel ไม่ได้เป็นเพียงเครื่องมือในการเก็บรักษาข้อมูลและการบัญชีของ บริษัท เท่านั้น พลังของมันอยู่ที่มันทำหน้าที่ในการจำแนกและจัดการเกือบทุกอย่างด้วยวิธีที่ง่ายและรวดเร็ว เราสามารถสร้างวาระการทำงานสมุดรายชื่อเทมเพลตใบแจ้งหนี้บันทึกการเข้างาน ... อย่างไรก็ตาม Excel ไม่อนุญาตให้เราจัดระเบียบแผ่นงานสมุดงานซึ่งเป็นสิ่งที่มีประโยชน์มากเมื่อทำงานกับหนังสือขนาดยาว แต่เราสามารถจัดเรียงแท็บ Excel โดยอัตโนมัติด้วยแมโครในรหัสภาพขั้นพื้นฐาน เราอธิบายวิธีการทำทีละขั้นตอน
คำว่า "มาโครในโค้ด Visual Basic" อาจดูน่ากลัว แต่ทุกอย่างง่ายกว่าที่คิด มาโครคือโปรแกรมขนาดเล็กที่ดำเนินการชุดของการกระทำสำหรับเราใน Excel และทำหน้าที่ในการทำงานซ้ำโดยอัตโนมัติ มาโครเขียนด้วยโค้ด Visual Basic for Applications (หรือ VBA) ซึ่งเป็นภาษาโปรแกรมที่ช่วยให้คุณเข้าถึงและขยายฟังก์ชันของ Excel ได้
โปรแกรมแก้ไข Visual Basic
ในการสร้างมาโครของเราเราต้องเปิดสมุดงานใด ๆ ใน Excel และยิ่งมีแท็บมากเท่าไหร่ก็ยิ่งดีเท่านั้น
เพื่อเปิดตัวแก้ไข VBA เราใช้แป้นพิมพ์ลัดAlt + F11 เมื่อหน้าต่างแก้ไขปรากฏเราค้นหาสมุดงาน Excel โดยเฉพาะอย่างยิ่งที่เรียกว่าPersonal.xlsหนังสือเล่มนี้มีคุณสมบัติที่ไม่ว่าเราจะทำอะไรก็ตามจะส่งผลกระทบต่อสมุดงานทั้งหมด นั่นคือถ้าเราสร้างมาโครเราสามารถใช้ได้ทุกเมื่อที่ต้องการ
หากคุณไม่พบหนังสือส่วนตัวไม่ต้องกังวล ออกจากตัวแก้ไขให้เปิดExcel ดูแท็บดึงลงแมโครเมนูและเลือกบันทึกแมโคร บันทึกมาโครในสมุดบันทึกมาโครส่วนตัวของคุณและเริ่มการบันทึก จากนั้นเปิดเมนูมาโครอีกครั้งและหยุดบันทึก คุณมีหนังสือ "พิเศษ" อยู่แล้ว
ตอนนี้เรามีทุกอย่างพร้อมที่จะสร้างโมดูลใหม่ เราเปิดตัวแก้ไข VBA กับAlt + F11เลือกหนังสือ Personal.xls แล้วคลิกแทรก> โมดูล เราวางเคอร์เซอร์ในหน้าต่างโมดูลและเขียนรหัสต่อไปนี้:
ย่อย SortSheets_Ascendant ()
สำหรับ a = 1 To Sheets.Count
สำหรับ s = a + 1 To Sheets.Count
ถ้า UCase (Sheets (a) .Name)> UCase (Sheets (s) .Name) แล้ว
ชีต (s) ย้ายก่อน: = ชีต (ก)
สิ้นสุดถ้า
ถัดไป
ถัดจาก
End Sub
เราปิดหน้าต่างและมาโครจะถูกจัดเก็บโดยอัตโนมัติ ยังคงอยู่เพื่อตรวจสอบว่าใช้งานได้ เราเปิดหนังสือที่มีแท็บเราต้องการที่จะเรียงลำดับการที่เราจะไปดูและคลิกที่แมโครหรือเรากดแป้นพิมพ์ลัดAlt + F8 ดับเบิลคลิกที่SortSheets_Ascendantและแท็บหนังสือเล่มนี้จะถูกวางไว้ตามลำดับตัวอักษรในทันที
เมื่อเราปิด Excel โปรแกรมจะถามเราว่าต้องการบันทึกการเปลี่ยนแปลงที่เกิดขึ้นกับมาโครหรือไม่ เรายอมรับและมาโครของเราจะถูกเก็บไว้เพื่อใช้กับหนังสือที่เราต้องการ
เรียงแผ่นงานจากมากไปหาน้อย
มีไม่กี่เปลี่ยนแปลงโค้ดขนาดเล็กเราสามารถบรรลุผลย้อนกลับ: จัดเรียงแท็บโดยเรียงตามลำดับตัวอักษร เราทำซ้ำขั้นตอนในการสร้างมาโครและคราวนี้เราใส่รหัสต่อไปนี้:
ย่อย SortSheets_Descending ()
สำหรับ a = 1 To Sheets.Count
สำหรับ s = a + 1 To Sheets.Count
ถ้า UCase (Sheets (a) .Name) <UCase (Sheets (s) .Name) แล้ว
ชีต (s) ย้ายก่อน: = ชีต (ก)
สิ้นสุดถ้า
ถัดไป
ถัดจาก
End Sub
มีเพียงสองรูปแบบ อย่างแรกคือชื่อของมาโคร ประการที่สองคือการเปลี่ยนจาก> เป็น <ในบรรทัดที่สี่ของโค้ด ซึ่งหมายความว่าการสั่งซื้อของแผ่นในหนังสือเล่มนี้จะเปลี่ยนทิศทาง ตอนนี้เมื่อคุณคลิกView> Macros (หรือAlt + F8ทางลัด) คุณจะเห็นมาโครที่สร้างขึ้นใหม่สองอัน ดับเบิลคลิกที่SortSheets_Descendingและตรวจสอบด้วยความพึงพอใจผลของมัน
บันทึกการเปลี่ยนแปลงเมื่อออกจาก Excel, เราจะมีทั้งสองแมโครสามารถใช้ได้ในเวลาใด ๆ พวกเขาจะช่วยเราประหยัดเวลาและความพยายามอย่างมากเมื่อจัดการกับแท็บสมุดงาน Excel ที่มีขนาดใหญ่เป็นพิเศษ