ไปยังเนื้อหาหลัก

วิธีบันทึกไฟล์ Excel อัตโนมัติหลังจากป้อนข้อมูล

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

บันทึกไฟล์ Excel โดยอัตโนมัติหลังจากป้อนข้อมูลด้วยรหัส VBA


บันทึกไฟล์ Excel โดยอัตโนมัติหลังจากป้อนข้อมูลด้วยรหัส VBA

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

1. คลิกขวาที่แท็บแผ่นงานที่คุณต้องการบันทึกสมุดงานโดยอัตโนมัติหลังจากป้อนข้อมูลใหม่แล้วเลือก ดูรหัส จากเมนูบริบทในเปิด Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่างคัดลอกและวางรหัสต่อไปนี้ลงในโมดูลเปล่า:

รหัส VBA: บันทึกไฟล์ Excel อัตโนมัติหลังจากป้อนข้อมูล:

Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, Me.Range("A1:AA1000")) Is Nothing Then
        ThisWorkbook.Save
    End If
End Sub

หมายเหตุ: ในโค้ดด้านบน A1: AA1000 คือช่วงเซลล์ที่คุณต้องการใช้รหัสนี้

2. จากนั้นบันทึกและปิดหน้าต่างรหัสนี้ตอนนี้เมื่อคุณอัปเดตหรือป้อนข้อมูลใหม่ลงในเซลล์แผ่นงานเฉพาะสมุดงานจะถูกบันทึกโดยอัตโนมัติโดยไม่ต้องคลิกปุ่มบันทึก

สุดยอดเครื่องมือเพิ่มผลผลิตในสำนักงาน

คุณสมบัติยอดนิยม: ค้นหา เน้น หรือระบุรายการที่ซ้ำกัน   |  ลบแถวว่าง   |  รวมคอลัมน์หรือเซลล์โดยไม่สูญเสียข้อมูล   |   รอบโดยไม่มีสูตร ...
การค้นหาขั้นสูง: VLookup หลายเกณฑ์    VLookup หลายค่า  |   VLookup ข้ามหลายแผ่น   |   การค้นหาที่ไม่ชัดเจน ....
รายการแบบเลื่อนลงขั้นสูง: สร้างรายการแบบหล่นลงอย่างรวดเร็ว   |  รายการแบบหล่นลงขึ้นอยู่กับ   |  เลือกหลายรายการแบบหล่นลง ....
ผู้จัดการคอลัมน์: เพิ่มจำนวนคอลัมน์เฉพาะ  |  ย้ายคอลัมน์  |  สลับสถานะการมองเห็นของคอลัมน์ที่ซ่อนอยู่  |  เปรียบเทียบช่วงและคอลัมน์ ...
คุณสมบัติเด่น: กริดโฟกัส   |  มุมมองการออกแบบ   |   บาร์สูตรใหญ่    สมุดงานและตัวจัดการชีต   |  ห้องสมุดทรัพยากร (ข้อความอัตโนมัติ)   |  เลือกวันที่   |  รวมแผ่นงาน   |  เข้ารหัส/ถอดรหัสเซลล์    ส่งอีเมลตามรายการ   |  ซุปเปอร์ฟิลเตอร์   |   ตัวกรองพิเศษ (กรองตัวหนา/ตัวเอียง/ขีดทับ...) ...
ชุดเครื่องมือ 15 อันดับแรก12 ข้อความ เครื่องมือ (เพิ่มข้อความ, ลบอักขระ, ... )   |   50 + แผนภูมิ ประเภท (แผนภูมิ Gantt, ... )   |   40+ ใช้งานได้จริง สูตร (คำนวณอายุตามวันเกิด, ... )   |   19 การแทรก เครื่องมือ (ใส่ QR Code, แทรกรูปภาพจากเส้นทาง, ... )   |   12 การแปลง เครื่องมือ (ตัวเลขเป็นคำ, การแปลงสกุลเงิน, ... )   |   7 ผสานและแยก เครื่องมือ (แถวรวมขั้นสูง, แยกเซลล์, ... )   |   ... และอื่น ๆ

เพิ่มพูนทักษะ Excel ของคุณด้วย Kutools สำหรับ Excel และสัมผัสประสิทธิภาพอย่างที่ไม่เคยมีมาก่อน Kutools สำหรับ Excel เสนอคุณสมบัติขั้นสูงมากกว่า 300 รายการเพื่อเพิ่มประสิทธิภาพและประหยัดเวลา  คลิกที่นี่เพื่อรับคุณสมบัติที่คุณต้องการมากที่สุด...

kte แท็บ 201905


แท็บ Office นำอินเทอร์เฟซแบบแท็บมาที่ Office และทำให้งานของคุณง่ายขึ้นมาก

  • เปิดใช้งานการแก้ไขและอ่านแบบแท็บใน Word, Excel, PowerPoint, ผู้จัดพิมพ์, Access, Visio และโครงการ
  • เปิดและสร้างเอกสารหลายรายการในแท็บใหม่ของหน้าต่างเดียวกันแทนที่จะเป็นในหน้าต่างใหม่
  • เพิ่มประสิทธิภาพการทำงานของคุณ 50% และลดการคลิกเมาส์หลายร้อยครั้งให้คุณทุกวัน!
Comments (3)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Great script. Thank you!
How would you do to target the whole workbook, I mean any worksheet that changes would trigger the save?
This comment was minimized by the moderator on the site
Option undo is useless, so be careful!!
This comment was minimized by the moderator on the site
haha thanks for the heads up dude!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations