วิธีบันทึกสมุดงานไปยังตำแหน่งต่างๆใน Excel อย่างรวดเร็ว

ใน Excel เราสามารถบันทึกเวิร์กบุ๊กไปยังตำแหน่งที่เจาะจงได้ตามต้องการ อย่างไรก็ตาม คุณเคยจินตนาการถึงการบันทึกเวิร์กบุ๊กหนึ่งไปยังหลายโฟลเดอร์ในเวลาเดียวกันหรือไม่ ในบทความนี้ คุณสามารถบันทึกเวิร์กบุ๊กหนึ่งไปยังหลายตำแหน่งพร้อมกันได้อย่างรวดเร็วด้วยโค้ด VBA

บันทึกสมุดงานไปยังตำแหน่งต่างๆด้วย VBA

บันทึกสมุดงานไปยังตำแหน่งต่างๆด้วย VBA

ในการบันทึกเวิร์กบุ๊กไปยังตำแหน่งต่างๆคุณเพียงแค่ใช้รหัสแมโครเดียว

1 กด Alt + F11 กุญแจเพื่อเปิด Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง

2 คลิก สิ่งที่ใส่เข้าไป > โมดูล และวางโค้ดด้านล่างลงในสคริปต์โมดูล ดูภาพหน้าจอ:

VBA: บันทึกสมุดงานไปยังตำแหน่งต่างๆ

Sub SaveToLocations()
'UpdateByExtendoffice20160623
    ActiveWorkbook.SaveCopyAs "C:\Users\DT168\Documents\" + ActiveWorkbook.Name
    ActiveWorkbook.SaveCopyAs "C:\Users\DT168\" + ActiveWorkbook.Name
    ActiveWorkbook.Save
End Sub

ปลาย:ในโค้ดแมโคร คุณสามารถเปลี่ยนเส้นทางการบันทึกได้ตามต้องการ

3 กด F5 คีย์เพื่อเรียกใช้รหัสและสมุดงานที่ใช้งานอยู่ได้รับการบันทึกไปยังตำแหน่งที่คุณระบุไว้ในรหัส