วิธีใช้ฟังก์ชัน Save As เพื่อเขียนทับไฟล์ที่มีอยู่ใน Excel โดยอัตโนมัติ
เมื่อบันทึกเวิร์กบุ๊ก Excel ลงในโฟลเดอร์ใหม่คุณจะได้รับกล่องพร้อมท์ตามภาพด้านล่างที่แสดงหากมีสมุดงานชื่อเดียวกันอยู่และอยู่ในโฟลเดอร์ จะเขียนทับไฟล์ที่มีอยู่โดยอัตโนมัติโดยไม่มีข้อความแจ้งเตือนได้อย่างไร? วิธีการในบทความนี้สามารถช่วยคุณได้
บันทึกเป็นฟังก์ชันเพื่อเขียนทับไฟล์ที่มีอยู่โดยอัตโนมัติด้วยรหัส VBA
บันทึกเป็นฟังก์ชันเพื่อเขียนทับไฟล์ที่มีอยู่โดยอัตโนมัติด้วยรหัส VBA
ถ้าคุณต้องการบันทึกสมุดงานด้วยชื่อใหม่และเขียนทับไฟล์ที่มีอยู่ใน Excel โดยอัตโนมัติ กรุณาดำเนินการดังนี้
1. ประการแรกโปรดสร้างปุ่มคำสั่งเพื่อเรียกใช้ฟังก์ชันบันทึกเป็นในแผ่นงานของคุณ กรุณาคลิก ผู้พัฒนา > สิ่งที่ใส่เข้าไป > ปุ่มคำสั่ง (Active X Control). ดูภาพหน้าจอ:
2. วาดปุ่มคำสั่งบนแผ่นงานของคุณ จากนั้นคลิกขวาและเลือก ดูรหัส จากเมนูบริบท
3 ใน Microsoft Visual Basic สำหรับแอปพลิเคชัน โปรดคัดลอกโค้ด VBA ด้านล่างและวางระหว่างไฟล์ ย่อยส่วนตัว และ ย่อยสิ้นสุด เส้นใน รหัส หน้าต่าง
รหัส VBA: บันทึกเป็นฟังก์ชันเพื่อเขียนทับไฟล์ที่มีอยู่โดยอัตโนมัติ
Dim xFileName As String
Application.DisplayAlerts = False
If Right(ActiveWorkbook.Name, 4) = "xlsm" Then
xFileName = Application.GetSaveAsFilename(ActiveWorkbook.Name, "Excel Macro-Enabled Workbook (*.xlsm),*.xlsm")
Else
xFileName = Application.GetSaveAsFilename(ActiveWorkbook.Name, "Excel Workbook (*.xlsx),*.xlsx")
End If
If (xFileName <> "") Or (xFileName <> "False") Then
ActiveWorkbook.SaveAs Filename:=xFileName
End If
Application.DisplayAlerts = True4 กด อื่น ๆ + Q ปุ่มเพื่อออกจากไฟล์ Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง. และปิด โหมดการออกแบบ ภายใต้ ผู้พัฒนา แถบ
5. คลิกปุ่มคำสั่งจากนั้นคลิกปุ่ม บันทึกเป็น กล่องโต้ตอบปรากฏขึ้นโปรดเลือกโฟลเดอร์เพื่อบันทึกสมุดงานนี้จากนั้นคลิกที่ไฟล์ ลด ปุ่ม
หากมีสมุดงานชื่อเดียวกันอยู่ในโฟลเดอร์ปลายทางสมุดงานนั้นจะถูกเขียนทับโดยอัตโนมัติด้วยสมุดงานปัจจุบันโดยตรงโดยไม่ต้องแจ้ง
บทความที่เกี่ยวข้อง:
- วิธีบันทึกแผ่นงานเป็นไฟล์ PDF และส่งอีเมลเป็นไฟล์แนบผ่าน Outlook?
- วิธีบันทึกชื่อไฟล์ Excel ด้วยการประทับเวลา?
- วิธีบันทึกส่งออกหลายแผ่น / ทั้งหมดเพื่อแยกไฟล์ csv หรือไฟล์ข้อความใน Excel
- จะปิดหรือไม่อนุญาตตัวเลือก Save & Save As ใน Excel ได้อย่างไร
- วิธีปิดการใช้งานสมุดงานบันทึก แต่อนุญาตให้บันทึกเป็นใน Excel เท่านั้น
สุดยอดเครื่องมือเพิ่มผลผลิตในสำนักงาน
เพิ่มพูนทักษะ Excel ของคุณด้วย Kutools สำหรับ Excel และสัมผัสประสิทธิภาพอย่างที่ไม่เคยมีมาก่อน Kutools สำหรับ Excel เสนอคุณสมบัติขั้นสูงมากกว่า 300 รายการเพื่อเพิ่มประสิทธิภาพและประหยัดเวลา คลิกที่นี่เพื่อรับคุณสมบัติที่คุณต้องการมากที่สุด...
แท็บ Office นำอินเทอร์เฟซแบบแท็บมาที่ Office และทำให้งานของคุณง่ายขึ้นมาก
- เปิดใช้งานการแก้ไขและอ่านแบบแท็บใน Word, Excel, PowerPoint, ผู้จัดพิมพ์, Access, Visio และโครงการ
- เปิดและสร้างเอกสารหลายรายการในแท็บใหม่ของหน้าต่างเดียวกันแทนที่จะเป็นในหน้าต่างใหม่
- เพิ่มประสิทธิภาพการทำงานของคุณ 50% และลดการคลิกเมาส์หลายร้อยครั้งให้คุณทุกวัน!
