Vba: วิธีบันทึกและปิดสมุดงาน (พร้อมตัวอย่าง)

คุณสามารถใช้ไวยากรณ์ต่อไปนี้ใน VBA เพื่อบันทึกและปิดสมุดงาน:

 SubSaveClose ()

ActiveWorkbook.Close_
SaveChanges:=True, _
Filename:=" C:\Users\bob\Desktop\MyExcelFile.xlsx "

End Sub

มาโครนี้จะบันทึกการเปลี่ยนแปลงล่าสุดในสมุดงานที่ใช้งานอยู่ในปัจจุบันแล้วจึงปิด

คำสั่ง Filename ระบุตำแหน่งที่จะบันทึกสมุดงาน

โปรดทราบว่าหากคุณ ไม่ต้องการ บันทึกการเปลี่ยนแปลงก่อนที่จะปิดสมุดงาน คุณสามารถใช้คำสั่ง SaveChanges:=False แทนได้

ตัวอย่างต่อไปนี้แสดงวิธีใช้ไวยากรณ์นี้ในทางปฏิบัติ

ตัวอย่าง: บันทึกและปิดสมุดงานโดยใช้ VBA

สมมติว่าเราเปิดเวิร์กบุ๊ก Excel ต่อไปนี้และเรากำลังดูอยู่:

สมมติว่าเราต้องการบันทึกการเปลี่ยนแปลงล่าสุดที่เราทำกับเวิร์กบุ๊กนี้ แล้วบันทึกลงในเดสก์ท็อปของเรา

เราสามารถสร้างมาโครต่อไปนี้เพื่อทำสิ่งนี้:

 SubSaveClose ()

ActiveWorkbook.Close_
SaveChanges:=True, _
Filename:=" C:\Users\bob\Desktop\MyExcelFile.xlsx "

End Sub

หลังจากที่แมโครนี้ทำงาน การเปลี่ยนแปลงล่าสุดจะถูกบันทึกและเวิร์กบุ๊กจะถูกปิดโดยอัตโนมัติ

จากนั้น ฉันสามารถไปที่เดสก์ท็อปของคอมพิวเตอร์และค้นหาสมุดงาน Excel ที่บันทึกไว้ได้:

สมุดงานถูกบันทึกเป็น MyExcelFile.xlsx ตามที่เราระบุโดยใช้คำสั่ง Filename

หมายเหตุ : คุณสามารถค้นหาเอกสารฉบับสมบูรณ์สำหรับวิธี Workbook.Close ใน VBA ได้ที่นี่

แหล่งข้อมูลเพิ่มเติม

บทช่วยสอนต่อไปนี้จะอธิบายวิธีการทำงานทั่วไปอื่นๆ ใน VBA:

VBA: วิธีนับจำนวนแผ่นงานในสมุดงาน
VBA: วิธีดึงข้อมูลจากสมุดงานอื่น
VBA: วิธีเพิ่มแผ่นงานใหม่