วิธีเพิ่มเครื่องหมายขีดและเครื่องหมายกากบาทลงในรายการแบบหล่นลงใน Excel
โดยปกติหลังจากใส่เครื่องหมายขีดและเครื่องหมายกากบาทในเซลล์ที่มีฟังก์ชันสัญลักษณ์แล้วสร้างรายการแบบหล่นลงโดยมีรายการเหล่านี้เป็นแหล่งข้อมูลผลลัพธ์จะแสดงเป็นüหรือûในเซลล์แบบเลื่อนลง วิธีแสดง✓และ สัญลักษณ์ในเซลล์หลังจากเลือกรายการจากรายการแบบเลื่อนลง? วิธี VBA ด้านล่างนี้จะช่วยในการสร้างขีดและข้ามรายการแบบหล่นลงใน Excel
เพิ่มเครื่องหมายขีดและเครื่องหมายกากบาทลงในรายการแบบเลื่อนลงด้วยรหัส VBA
เพิ่มเครื่องหมายขีดและเครื่องหมายกากบาทลงในรายการแบบเลื่อนลงด้วยรหัส VBA
ด้วยรหัส VBA ด้านล่างคุณสามารถแทรกติ๊กและข้ามรายการแบบเลื่อนลงลงในเซลล์ที่ระบุใน Excel กรุณาดำเนินการดังนี้
1. ในแผ่นงานคุณจะสร้างรายการแบบเลื่อนลงเครื่องหมายถูกและเครื่องหมายกากบาทคลิกขวาที่แท็บแผ่นงานแล้วเลือก ดูรหัส จากเมนูบริบท
2. จากนั้น Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่างจะเปิดขึ้นโปรดคัดลอกโค้ด VBA ด้านล่างลงในหน้าต่างรหัส
รหัส VBA 1: เพิ่มเครื่องหมายขีดและเครื่องหมายกากบาทลงในรายการแบบหล่นลง
Private Sub Worksheet_Change(ByVal Target As Range)
'Update by Extendoffice 20180703
If Intersect(Target, Range("B1:B10")) Is Nothing Then Exit Sub
If Target.Value = "Tick" Then
Target.Value = "P"
ElseIf Target.Value = "Cross" Then
Target.Value = "S"
End If
End Sub
3. ไปที่คลิก สิ่งที่ใส่เข้าไป > โมดูลจากนั้นคัดลอกรหัส 2 ต่อไปนี้ลงในหน้าต่างโมดูล
รหัส VBA 2: เพิ่มเครื่องหมายขีดและเครื่องหมายกากบาทลงในรายการแบบหล่นลง
Sub usingSymbols()
'Update by Extendoffice 20180703
Dim xRg As Range
Set xRg = Range("B1:B10")
xRg.Font.Name = "Wingdings 2"
xRg.Validation.Add xlValidateList, , , "Tick,Cross"
End Sub
หมายเหตุ: ในโค้ดด้านบน B1: B10 คือช่วงของเซลล์ที่คุณจะสร้างขีดและรายการแบบเลื่อนลงข้าม โปรดเปลี่ยนช่วงตามที่คุณต้องการ
4 กด F5 กุญแจสำคัญในการเรียกใช้รหัส
ตอนนี้รายการแบบเลื่อนลงขีดและสัญลักษณ์กากบาทถูกแทรกลงในช่วง B1: B10 เลือกติ๊กจากเมนูแบบเลื่อนลงจะแทรก✓ลงในเซลล์และเลือกข้ามจะแสดง สัญลักษณ์. ดูภาพหน้าจอ:
บทความที่เกี่ยวข้อง:
- วิธีเติมข้อมูลเซลล์อื่นโดยอัตโนมัติเมื่อเลือกค่าในรายการแบบเลื่อนลงของ Excel
- วิธีเติมข้อความอัตโนมัติเมื่อพิมพ์ในรายการแบบเลื่อนลงของ Excel
- วิธีสร้างปฏิทินรายการแบบหล่นลงใน Excel
- วิธีสร้างรายการแบบหล่นลงด้วยการเลือกหรือค่าต่างๆใน Excel
สุดยอดเครื่องมือเพิ่มผลผลิตในสำนักงาน
เพิ่มพูนทักษะ Excel ของคุณด้วย Kutools สำหรับ Excel และสัมผัสประสิทธิภาพอย่างที่ไม่เคยมีมาก่อน Kutools สำหรับ Excel เสนอคุณสมบัติขั้นสูงมากกว่า 300 รายการเพื่อเพิ่มประสิทธิภาพและประหยัดเวลา คลิกที่นี่เพื่อรับคุณสมบัติที่คุณต้องการมากที่สุด...
แท็บ Office นำอินเทอร์เฟซแบบแท็บมาที่ Office และทำให้งานของคุณง่ายขึ้นมาก
- เปิดใช้งานการแก้ไขและอ่านแบบแท็บใน Word, Excel, PowerPoint, ผู้จัดพิมพ์, Access, Visio และโครงการ
- เปิดและสร้างเอกสารหลายรายการในแท็บใหม่ของหน้าต่างเดียวกันแทนที่จะเป็นในหน้าต่างใหม่
- เพิ่มประสิทธิภาพการทำงานของคุณ 50% และลดการคลิกเมาส์หลายร้อยครั้งให้คุณทุกวัน!