วิธีการสร้างสมุดงาน microsoft excel

การสร้างสมุดงานใหม่ใน Visual Basic Editor ใช้วิธีการเพิ่ม (Add Method)  Code ด้านล่างนี้จะเป็นการสร้างสมุดงาน Microsoft Excel ใหม่โดยอัตโนมัติ ชื่อที่ได้จะเป็น “BookN” โดยอักษร N คือ หมายเลขลำดับของสมุดงานที่พร้อมใช้งาน ณ ปัจจุบันที่ Code นี้ทำงาน สมุดงานใหม่จะกลายเป็นสมุดงานที่กำลังทำงานหรือ Active Workbook

การสร้างสมุดงานใหม่ให้กดแป้น Alt+F11 เพื่อเปิดหน้าต่าง Visual Basic Editor จากนั้นเข้าเมนู Insert เลือก Module เพื่อสร้าง Module ใหม่ จากนั้นคีย์ Code ตามด้านล่าง

Sub AddOne()
    Workbooks.Add
End Sub

Sub AddOne() Workbooks.Add End Sub

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

Sub AddNew()     
    Set NewBook = Workbooks.Add 
    With NewBook 
        .Title = "All Sales" 
        .Subject = "Sales" 
        .SaveAs Filename:="Allsales.xlsx" 
    End With 
End Sub

Sub AddNew()     Set NewBook = Workbooks.Add With NewBook .Title = "All Sales" .Subject = "Sales" .SaveAs Filename:="Allsales.xlsx" End With End Sub

การปิดหน้าต่าง Visual Basic Editor ให้กดแป้น Alt+Q เพื่อกลับไปยังหน้าต่าง Excel และหากต้องการจะเรียกใช้ Code ที่เขียนไว้แล้วเพื่อทดสอบการทำงานให้กดแป้น Alt+F8 จากนั้นเลือก Code แล้วคลิก Run ตามต้องการ