จะแทรกการประทับวันที่ลงในเซลล์ได้อย่างไรหากเลือกช่องทำเครื่องหมายใน Excel
โดยปกติคุณป้อนการประทับวันที่โดยใช้ปุ่มลัดใน Excel วิธีการแทรกวันที่ลงในเซลล์ด้วยช่องทำเครื่องหมายใน Excel? เมื่อเลือกช่องทำเครื่องหมายการประทับเวลาจะถูกแทรกลงในเซลล์ที่ระบุโดยอัตโนมัติ บทความนี้จะช่วยคุณแก้ปัญหานี้
แทรกการประทับวันที่ลงในเซลล์หากเลือกช่องทำเครื่องหมายด้วยรหัส VBA
แทรกการประทับวันที่ลงในเซลล์หากเลือกช่องทำเครื่องหมายด้วยรหัส VBA
ส่วนนี้จะแนะนำสคริปต์ VBA เพื่อช่วยคุณแทรกการประทับวันที่ลงในเซลล์โดยอัตโนมัติหากเลือกช่องทำเครื่องหมายใน Excel กรุณาดำเนินการดังนี้
1. หลังจากใส่กล่องกาเครื่องหมายแล้วให้กด อื่น ๆ + F11 พร้อมกันเพื่อเปิดไฟล์ Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง
2 ใน Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่างคลิก สิ่งที่ใส่เข้าไป > โมดูล. จากนั้นคัดลอกและวางโค้ด VBA ด้านล่างลงในหน้าต่างโมดูล
รหัส VBA: แทรกการประทับวันที่ลงในเซลล์หากเลือกช่องทำเครื่องหมาย
Sub CheckBox_Date_Stamp()
Dim xChk As CheckBox
Set xChk = ActiveSheet.CheckBoxes(Application.Caller)
With xChk.TopLeftCell.Offset(, 1)
If xChk.Value = xlOff Then
.Value = ""
Else
.Value = Date
End If
End With
End Sub
3 กด อื่น ๆ + Q ปุ่มเพื่อปิดไฟล์ Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง
4. คลิกขวาที่กล่องกาเครื่องหมายแล้วเลือก กำหนดไมโคร จากเมนูคลิกขวา ดูภาพหน้าจอ:
5 ใน กำหนดมาโคร ใหเลือก ช่องทำเครื่องหมาย_วันที่_ประทับตรา ใน ชื่อมาโคร จากนั้นคลิกที่ไฟล์ OK ปุ่ม. ดูภาพหน้าจอ:
เมื่อติ๊กช่องทำเครื่องหมายการประทับวันที่จะถูกแทรกลงในเซลล์ที่อยู่ติดกันโดยอัตโนมัติ
บทความที่เกี่ยวข้อง:
- วิธีเปลี่ยนค่าหรือสีของเซลล์ที่ระบุเมื่อเลือกช่องทำเครื่องหมายใน Excel
- วิธีการเน้นเซลล์หรือแถวด้วยช่องทำเครื่องหมายใน Excel
- จะตรวจสอบช่องทำเครื่องหมายตามค่าเซลล์ใน Excel ได้อย่างไร
- วิธีกรองข้อมูลตามช่องทำเครื่องหมายใน Excel
- วิธีซ่อนช่องทำเครื่องหมายเมื่อซ่อนแถวใน Excel
- วิธีสร้างรายการแบบหล่นลงพร้อมช่องทำเครื่องหมายหลายช่องใน Excel
สุดยอดเครื่องมือเพิ่มผลผลิตในสำนักงาน
เสริมทักษะ Excel ของคุณด้วย Kutools for Excelและสัมผัสประสิทธิภาพอย่างที่ไม่เคยมีมาก่อน Kutools for Excel เสนอคุณสมบัติขั้นสูงมากกว่า 300 รายการเพื่อเพิ่มประสิทธิภาพและประหยัดเวลา คลิกที่นี่เพื่อรับคุณสมบัติที่คุณต้องการมากที่สุด...
Office Tab นำอินเทอร์เฟซแบบแท็บมาสู่ Office และทำให้งานของคุณง่ายขึ้นมาก
- เปิดใช้งานการแก้ไขและอ่านแบบแท็บใน Word, Excel, PowerPoint, ผู้จัดพิมพ์, Access, Visio และโครงการ
- เปิดและสร้างเอกสารหลายรายการในแท็บใหม่ของหน้าต่างเดียวกันแทนที่จะเป็นในหน้าต่างใหม่
- เพิ่มประสิทธิภาพการทำงานของคุณ 50% และลดการคลิกเมาส์หลายร้อยครั้งให้คุณทุกวัน!






















