วิธีใช้ฟังก์ชัน 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 = True

4 กด อื่น ๆ + Q ปุ่มเพื่อออกจากไฟล์ Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง. และปิด โหมดการออกแบบ ภายใต้ ผู้พัฒนา แถบ

5. คลิกปุ่มคำสั่งจากนั้นคลิกปุ่ม บันทึกเป็น กล่องโต้ตอบปรากฏขึ้นโปรดเลือกโฟลเดอร์เพื่อบันทึกสมุดงานนี้จากนั้นคลิกที่ไฟล์ ลด ปุ่ม

หากมีสมุดงานชื่อเดียวกันอยู่ในโฟลเดอร์ปลายทางสมุดงานนั้นจะถูกเขียนทับโดยอัตโนมัติด้วยสมุดงานปัจจุบันโดยตรงโดยไม่ต้องแจ้ง

ปลดล็อก Excel Magic ด้วย Kutools AI

• การดำเนินการอย่างชาญฉลาด: ดำเนินการกับเซลล์ วิเคราะห์ข้อมูล และสร้างแผนภูมิ ทั้งหมดนี้ขับเคลื่อนด้วยคำสั่งง่ายๆ
• สูตรที่กำหนดเอง: สร้างสูตรที่ปรับแต่งโดยเฉพาะเพื่อปรับปรุงขั้นตอนการทำงานของคุณ
• การเข้ารหัส VBA: เขียนและใช้งานโค้ด VBA ได้อย่างง่ายดาย
• การตีความสูตร: เข้าใจสูตรที่ซับซ้อนได้อย่างง่ายดาย
• การแปลข้อความ: ทลายกำแพงด้านภาษาภายในสเปรดชีตของคุณ

ปรับปรุงความสามารถ Excel ของคุณด้วยเครื่องมือที่ขับเคลื่อนด้วย AI ดาวน์โหลดเดี๋ยวนี้ และสัมผัสประสิทธิภาพอย่างที่ไม่เคยมีมาก่อน!

บทความที่เกี่ยวข้อง:

• วิธีบันทึกแผ่นงานเป็นไฟล์ PDF และส่งอีเมลเป็นไฟล์แนบผ่าน Outlook?
• วิธีบันทึกชื่อไฟล์ Excel ด้วยการประทับเวลา?
• วิธีบันทึกส่งออกหลายแผ่น / ทั้งหมดเพื่อแยกไฟล์ csv หรือไฟล์ข้อความใน Excel
• จะปิดหรือไม่อนุญาตตัวเลือก Save & Save As ใน Excel ได้อย่างไร
• วิธีปิดการใช้งานสมุดงานบันทึก แต่อนุญาตให้บันทึกเป็นใน Excel เท่านั้น