ในบทความนี้ เราจะมาแนะนำ 3 วิธีง่ายๆ ในการแทรกวันที่สร้างหรือวันที่แก้ไขล่าสุดลงในเอกสาร Word ของคุณ
ทุกครั้งที่เราสร้างเอกสารเอกสารจะมีข้อมูลมากมายเช่นวันที่สร้างและวันที่แก้ไขล่าสุด รายละเอียดเหล่านี้ทำให้เราติดตามได้ดีว่าเราแก้ไขเอกสารอย่างไร ดังนั้นวันนี้เราจะแสดงวิธีการเพื่อให้คุณสามารถแทรกวันที่สร้างหรือแก้ไขล่าสุดลงในเอกสารได้
หมายเหตุ:
ก่อนอื่นเมื่อคุณร่างเอกสารเสร็จแล้วให้บันทึกไว้ก่อน เพื่อให้คุณมีเวอร์ชันล่าสุดอยู่เสมอ คุณสามารถแทรกวันที่ที่เกี่ยวข้องลงในเอกสารได้โดยทำตามคำแนะนำต่อไปนี้
วิธีที่ 1: ใส่วันที่ด้วยตนเอง
ใน Word คุณสามารถดูวันที่ที่สร้างและแก้ไขล่าสุดได้หากคุณเปลี่ยนเป็นพื้นหลัง อย่างไรก็ตามคุณไม่สามารถคัดลอกข้อมูลนั้นได้โดยตรง แต่คุณต้องทำตามขั้นตอนเหล่านี้
- ประการแรกใน Word ให้คลิกแท็บ "ไฟล์"
- จากนั้นคลิกตัวเลือก "ข้อมูล" และในคอลัมน์ทางขวาสุดคลิก "คุณสมบัติ"
- จากนั้นในเมนูแบบเลื่อนลงเลือก "คุณสมบัติขั้นสูง"
- และในหน้าต่างเปิดขึ้นให้คลิกแท็บ "ทั่วไป"
- ตอนนี้คุณสามารถคัดลอกและวางข้อมูลที่เกี่ยวข้องลงในเอกสารได้
วิธีที่ 2: แทรกฟิลด์
- ก่อนอื่นวางตัวชี้การแทรกให้ถูกต้องแล้วคลิกแท็บ“ แทรก”
- จากนั้นคลิก“ Quick Parts” และเลือก“ Field”
- ในช่อง "ฟิลด์" ให้เลือก "วันที่และเวลา" สำหรับหมวดหมู่
- จากนั้นหากต้องการแทรกวันที่สร้างให้เลือกชื่อฟิลด์“ CreateDate” และหากต้องการแทรกวันที่แก้ไขล่าสุดให้เลือก“ SaveDate” แทน
- จากนั้นเลือกรูปแบบวันที่หากจำเป็น
- สุดท้ายคลิก“ ตกลง” คุณจะมีวันที่แทรกในส่วนที่เลือก
วิธีที่ 3: เรียกใช้รหัส VBA เพื่อแทรกทั้งวันที่สร้างและวันที่แก้ไขล่าสุด
- อันดับแรก ให้วางเคอร์เซอร์ไว้ที่ตำแหน่งที่ใช้ใส่ข้อมูลวันที่
- จากนั้นกด“ Alt + F11” เพื่อเปิดตัวแก้ไข VBA
- ในแผง "โครงการ" คลิก "ปกติ"
- จากนั้นคลิกแท็บ“ แทรก”
- เลือก "โมดูล"
- ดับเบิลคลิกเพื่อเปิดโมดูล
- วางรหัสต่อไปนี้ที่นั่น:
Function GetDocDates(strDocPath) As String
Dim objFileSystem As Object
Dim objFile As Object
Dim strDates As String
Set objFileSystem = CreateObject("Scripting.FileSystemObject")
Set objFile = objFileSystem.GetFile(strDocPath)
strDates = "Created Date: " & objFile.DateCreated & vbNewLine & _
"Last Modified Date: " & objFile.DateLastModified
GetDocDates = strDates
Set objFile = Nothing
Set objFileSystem = Nothing
End Function
' Call Function GetDocDates
Sub InsertDocDates()
' Insert dates at selection point.
Selection.InsertAfter GetDocDates(ActiveDocument.FullName)
End Sub
- วางเคอร์เซอร์ไว้ในมาโคร“ InsertDocDates” แล้วคลิกปุ่ม“ Run” เพื่อเรียกใช้
คุณจะได้รับวันที่แทรกลงในเอกสารดังนี้:
จัดการกับปัญหาข้อมูลสูญหาย
การสูญเสียข้อมูลได้กลายเป็นหัวข้อในปัจจุบัน ข้อมูลทุกประเภทกลายเป็นดิจิทัลแล้ว ซึ่งหมายความว่าเราต้องเตรียมพร้อมอย่างเต็มที่สำหรับภัยพิบัติของข้อมูลล่วงหน้า และความเสียหายของเอกสาร Word เป็นปัญหาที่เราสามารถพบได้อย่างง่ายดาย ดังนั้นเราขอแนะนำให้คุณรับไฟล์ ซ่อมแซมคำ เครื่องมือในมือ
บทนำผู้เขียน:
Vera Chen เป็นผู้เชี่ยวชาญด้านการกู้คืนข้อมูลใน DataNumen, Inc. ซึ่งเป็นผู้นำระดับโลกด้านเทคโนโลยีการกู้คืนข้อมูล ได้แก่ ซ่อม xls และ pdf ซ่อมแซมผลิตภัณฑ์ซอฟต์แวร์ ดูข้อมูลเพิ่มเติมได้ที่ wwwdatanumenด้วย.






