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


0

ฉันต้องการสร้างหลายเขตเวลาที่จะแสดงเวลาปัจจุบันเมื่อคุณคลิกที่มัน แต่จะไม่อัปเดตเมื่อฉันอัปเดตฟิลด์การเพิ่มอัตโนมัติที่ฉันใช้ในเอกสารเดียวกัน ฉันต้องการบางอย่างเช่นการควบคุมเนื้อหาตัวใช้เลือกวันที่ ฉันมีความหวังเมื่อฉันเห็นคุณสามารถแสดงวันที่เป็นแต่มันเป็นชนิดของไม่มีจุดหมายเพราะมันเท่านั้นที่เคยแสดงเป็นh:mm am/pm12:00 AM

มีวิธีที่ฉันสามารถเลือกวันที่เพื่อแสดงเวลาปัจจุบันเมื่อคุณคลิกที่ "วันนี้" หรือมีอย่างอื่นที่ฉันสามารถทำได้?


ไม่แน่ใจว่าสิ่งนี้ตรงตามความต้องการของคุณหรือไม่และใช้รหัสฟิลด์ {TIME} อย่างไร
Porcupine911

@ Porcupine911 ฉันลองแล้ว แต่เมื่อฉันอัปเดตฟิลด์อื่นฟิลด์เวลาทั้งหมดจะอัปเดตเป็นเวลาปัจจุบันเดียวกัน
ShemSeger

คำตอบ:


1

ใช่คุณสามารถใช้รหัสฟิลด์ TIME อัปเดตแต่ละรายการ (F9) เพื่อให้แสดงเวลาปัจจุบันแล้วล็อก (Ctrl + F11) เพื่อให้ค่าไม่เปลี่ยนแปลงเมื่อคุณอัปเดตฟิลด์อื่น ๆ ในเอกสาร

หากคุณต้องการองค์ประกอบ UI บางอย่างเพื่อให้เกิดสิ่งนี้เมื่อคลิกเมาส์ฉันเพียงตบตัวอย่างที่หยาบมากเข้าด้วยกันซึ่งฉันได้แทรกตัวควบคุม ActiveX ของปุ่มคำสั่งดั้งเดิม (บนแท็บนักพัฒนาให้คลิกเครื่องมือดั้งเดิม > ปุ่มคำสั่ง ) เพิ่มช่องว่างหลังจากนั้นจากนั้นแทรกฟิลด์ TIME จากนั้นฉันเพิ่มรหัสบิตหยาบนี้ไปยังปุ่ม (คลิกขวาแล้วคลิกรหัสดู ) เพื่อย้ายโฟกัสออกจากปุ่มย้ายเคอร์เซอร์ 2 ช่องว่างไปทางขวา (ลงในช่อง) อัปเดตและล็อคฟิลด์และ จากนั้นย้ายโฟกัสออกจากสนาม:

Private Sub CommandButton1_Click()
  Selection.MoveRight Unit:=wdCharacter, Count:=2
  Selection.Fields.Update
  Selection.Fields.Locked = True
  Selection.MoveRight Unit:=wdCharacter, Count:=1
End Sub

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

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

Private Sub CommandButton1_Click()
  Selection.MoveRight Unit:=wdCharacter, Count:=1
  Selection.InsertDateTime DateTimeFormat:="h:mm:ss am/pm", InsertAsField:=False, DateLanguage:=wdEnglishUS, CalendarType:=wdCalendarWestern, InsertAsFullWidth:=False
End Sub
โดยการใช้ไซต์ของเรา หมายความว่าคุณได้อ่านและทำความเข้าใจนโยบายคุกกี้และนโยบายความเป็นส่วนตัวของเราแล้ว
Licensed under cc by-sa 3.0 with attribution required.