วิธีแทรกวันที่ในอนาคตหรืออดีตในเอกสาร Word ของคุณผ่านรหัส VBA

แบ่งปันเลย:

ในบทความนี้เราจะแสดงเคล็ดลับที่น่าสนใจในการแทรกวันที่ในอนาคตหรือในอดีตลงในเอกสาร Word ของคุณผ่านรหัส VBA

โดยทั่วไปเราไม่มีปัญหาในการแทรกวันที่ปัจจุบันในเอกสาร Word ของเรา อย่างไรก็ตามในตอนนี้เราสามารถเตรียมเอกสารที่จำเป็นได้ในสัปดาห์หน้าหรือเดือนหน้าหรือหลังจากนั้น นี่คือปัญหาที่คุณไม่สามารถข้ามได้ คุณจะแทรกวันที่ในอนาคตในไฟล์ Word ได้อย่างไร? และบางครั้งอดีตเป็นอย่างไร?

ดังนั้นเราจึงคิดว่าคุณต้องเข้าใจวิธีการที่มีประโยชน์นี้เพื่อตอบสนองงานของคุณได้ดีขึ้น

ใช้รหัส VBA เพื่อแทรกวันที่ในอนาคตหรือวาง

  1. เริ่มต้นด้วยการเปิดเอกสาร Word ของคุณ
  2. จากนั้นคลิกแท็บ "นักพัฒนา"
  3. จากนั้นคลิก“ Visual Basic” เพื่อเปิดตัวแก้ไข VBA หากแท็บ“ นักพัฒนา” ไม่มีใน Word Ribbon ของคุณคุณสามารถกด“ Alt + F11” เพื่อเปิดตัวแก้ไขแทนคลิก "นักพัฒนา" -> คลิก "Visual Basic"
  4. ตอนนี้ในตัวแก้ไขคลิก "ปกติ" ทางด้านซ้าย
  5. จากนั้นคลิก“ แทรก” บนแถบเครื่องมือ
  6. จากนั้นเลือก "โมดูล" จากเมนูรายการคลิก "Normal" -> คลิก "Insert" -> คลิก "Module"
  7. ตอนนี้ดับเบิลคลิกที่โมดูลที่เพิ่งใส่เข้าไปและพื้นที่แก้ไขจะพร้อมใช้งานทางด้านขวา
  8. เพียงวางรหัสต่อไปนี้ที่นั่น:
Sub InsertFutureOrPastDate()
  Dim strNumberOfDays As String

  ' Input the number of days you want to insert from today to the future or past date.
  strNumberOfDays = InputBox("Please input the number of days you want to insert", "future or past date", "Input here.For exemple,input 1 to insert the date of tomorrow")
  ' Insert the future or past date according to the inputed number of days
  If strNumberOfDays <> "" Then
    Selection.TypeText Text:=Format(Date + strNumberOfDays, "dddd, MMMM dd, yyyy")
  End If       
End Sub
  1. จากนั้นคลิกปุ่ม "บันทึก" และปิดตัวแก้ไข VBAดับเบิลคลิกที่โมดูลใหม่ -> วางรหัส -> คลิก "บันทึก"
  2. ตอนนี้เปลี่ยนกลับไปที่หน้าจอเอกสาร Word และวางเคอร์เซอร์ไว้ที่ตำแหน่งที่จะไปวันที่ในอนาคตหรือในอดีต
  3. จากนั้นคลิกแท็บ "นักพัฒนา" อีกครั้ง
  4. แล้วคลิก“ มาโคร” ในกลุ่ม“ โค้ด” เพื่อเปิดหน้าต่าง“ มาโคร” อีกครั้งหากแท็บ“ นักพัฒนา” ไม่ปรากฏขึ้นคุณเพียงแค่กด“ Alt + F8”คลิก "นักพัฒนา" -> คลิก "มาโคร"
  5. ตอนนี้ในหน้าต่าง“ มาโคร” ค้นหาและเลือกมาโคร“ InsertFutureOrPastDate”
  6. จากนั้นคลิก“ Run”เลือก "InsertFutureOrPastDate" -> คลิก "Run"
  7. จากนั้นคุณจะได้รับการต้อนรับด้วยกล่องข้อความ คุณสามารถป้อนตัวเลขในกล่องข้อความที่ด้านล่างของกล่องเพื่อแสดงวันที่เหลือถึงวันที่ในอนาคต ตัวอย่างเช่นหากคุณต้องการแทรกวันที่ของวันพรุ่งนี้คุณควรป้อน“ 1” ที่นั่น ในทำนองเดียวกันหากคุณต้องการวันที่ที่ผ่านมาให้ใส่เครื่องหมายลบก่อนค่าเช่น“ -1” สำหรับเมื่อวาน
  8. อย่าลืมคลิก“ ตกลง”ป้อนในกล่องข้อความ -> คลิก "ตกลง"แทรกวันที่ในอนาคตและอดีต

หมายเหตุ: ในโค้ด“ Selection.TypeText Text: = Format (Date + strNumberOfDays,“ dddd, MMMM dd, yyyy”)”“ dddd, MMMM dd, yyyy” แทนรูปแบบวันที่โดยที่“ M” หมายถึง“ month” ,“ d” สำหรับ“ วัน”,“ y” สำหรับ“ ปี” และ“ dddd” สำหรับ“ สัปดาห์” ดังนั้นคุณสามารถเปลี่ยนแปลงได้ตามต้องการ

คืนไฟล์ที่มีค่าของคุณ

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

บทนำผู้เขียน:

Vera Chen เป็นผู้เชี่ยวชาญด้านการกู้คืนข้อมูลใน DataNumen, Inc. ซึ่งเป็นผู้นำระดับโลกด้านเทคโนโลยีการกู้คืนข้อมูล ได้แก่ การซ่อมแซมปัญหาไฟล์ Excel xls และ pdf ซ่อมแซมผลิตภัณฑ์ซอฟต์แวร์ ดูข้อมูลเพิ่มเติมได้ที่ wwwdatanumenด้วย.

แบ่งปันเลย:

ความเห็นถูกปิด