วิธีตรวจสอบว่าสมุดงานถูกบันทึกไว้หรือไม่?

เมื่อคุณเปิดสมุดงานใหม่คุณอาจลืมบันทึกมันจะน่ารำคาญหากคุณปิดสมุดงานโดยไม่ได้ตั้งใจ แต่คุณจะตรวจสอบได้อย่างไรว่าบันทึกสมุดงาน Excel แล้ว?

ตรวจสอบว่าสมุดงานถูกบันทึกไว้หรือไม่ด้วยรหัส VBA

ตรวจสอบว่าสมุดงานถูกบันทึกไว้หรือไม่ด้วยรหัส VBA

ตรวจสอบว่าสมุดงานถูกบันทึกไว้หรือไม่รหัส VBA ต่อไปนี้สามารถช่วยคุณได้โปรดทำตามนี้:

1. กด ALT + F11 คีย์เพื่อเปิด Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง

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

รหัส VBA: ตรวจสอบว่ามีการบันทึกสมุดงานหรือไม่:

Sub filesaved()
'Updateby Extendoffice 20161109
    Dim sLastTime As String
    On Error GoTo EHandler
    sLastTime = ActiveWorkbook.BuiltinDocumentProperties("last save time")
    MsgBox sLastTime, vbInformation, "Kutools for Excel"
    Exit Sub
EHandler:
    MsgBox "File not saved", vbInformation, "Kutools for Excel"
End Sub

3. จากนั้นกด F5 คีย์เพื่อเรียกใช้รหัสนี้คุณจะได้รับกล่องข้อความต่อไปนี้:

(1. ) หากบันทึกเวิร์กบุ๊กแล้วกล่องพร้อมต์จะปรากฏขึ้นเพื่อเตือนคุณถึงเวลาที่บันทึกล่าสุดของสมุดงานของคุณ:

(2. ) หากยังไม่ได้บันทึกสมุดงานคุณจะได้รับกล่องข้อความต่อไปนี้: