ไปยังเนื้อหาหลัก

จะแสดงกล่องข้อความได้อย่างไรหากค่าของเซลล์เท่ากับ“ X” ใน Excel

ผู้เขียน : ซิลูเวีย แก้ไขล่าสุด: 2024-09-23

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

ป๊อปอัพกล่องข้อความถ้าค่าของเซลล์เท่ากับ“ X” พร้อมรหัส VBA
ป๊อปอัพกล่องข้อความได้อย่างง่ายดายหากค่าของเซลล์เท่ากับ“ X” ด้วย Kutools for Excel


ป๊อปอัพกล่องข้อความถ้าค่าของเซลล์เท่ากับ“ X” พร้อมรหัส VBA

รหัส VBA ต่อไปนี้สามารถช่วยในการสร้างกล่องข้อความป๊อปอัปเมื่อมีค่าบางอย่างอยู่ในช่วงที่ระบุ กรุณาดำเนินการดังนี้

1. ในแผ่นงานคุณต้องตรวจสอบค่าในช่วงที่ระบุคลิกขวาที่ชื่อแท็บในแถบแท็บแผ่นงานจากนั้นคลิก ดูรหัส จากเมนูคลิกขวา ดูภาพหน้าจอ:

คลิกดูโค้ดจากเมนูคลิกขวา

2 ใน Microsoft Visual Basic สำหรับแอปพลิเคชัน คัดลอกและวางรหัส VBA ต่อไปนี้ลงในหน้าต่างรหัส

รหัส VBA: กล่องข้อความป๊อปอัปหากค่าของเซลล์เท่ากับ“ X”

Private Sub Worksheet_Change(ByVal Target As Range)
'Update: 2017/7/25
    Dim xCell As Range, Rg As Range
    On Error Resume Next
    Set Rg = Application.Intersect(Target, Range("A1:C7"))
    If Not Rg Is Nothing Then
        For Each xCell In Rg
            If xCell.Value = "50" Then
                MsgBox "guest entered into cell " & xCell.Address, vbInformation, "Kutools for Excel"
                Exit Sub
            End If
        Next
    End If
End Sub
Private Sub Worksheet_selectionChange(ByVal Target As Range)
    Dim xCell As Range, Rg As Range
    On Error Resume Next
    Set Rg = Application.Intersect(Target, Range("A1:C7"))
    If Not Rg Is Nothing Then
        For Each xCell In Rg
            If xCell.Value = "50" Then
                MsgBox "guest entered into cell " & xCell.Address, vbInformation, "Kutools for Excel"
                Exit Sub
            End If
        Next
    End If
End Sub

3 กด อื่น ๆ + Q พร้อมกันเพื่อปิดไฟล์ Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่างและกลับไปที่แผ่นงาน

จากนี้ไปเมื่อค่าของเซลล์เปลี่ยนแปลงในช่วง A1: C7 และมีค่าของเซลล์เท่ากับ "50" คุณจะได้รับกล่องข้อความตามภาพด้านล่างที่แสดง

นอกจากนี้คุณสามารถเลือกช่วงที่จะแสดงกล่องข้อความหากมีค่าเซลล์อยู่

หากค่าเซลล์เท่ากับค่าที่ระบุ กล่องพร้อมต์จะปรากฏขึ้น

หมายเหตุ : :

1. หากค่าเซลล์ไม่ตรงตามเกณฑ์กล่องข้อความจะไม่ปรากฏขึ้น
2. ในโค้ดด้านบนคุณสามารถเปลี่ยนการอ้างอิงเซลล์และค่าตามความต้องการของคุณ
3. สามารถแสดงการอ้างอิงเซลล์ที่ตรงกันได้เฉพาะเมื่อมีผลลัพธ์หลายรายการ

ป๊อปอัพกล่องข้อความถ้าค่าของเซลล์เท่ากับ“ X” ด้วย Kutools for Excel

เทศกาล เลือกเซลล์เฉพาะ ประโยชน์ของ Kutools สำหรับ Excel ยังสามารถช่วยคุณแก้ปัญหานี้ได้ กรุณาดำเนินการดังนี้

Kutools สำหรับ Excel นำเสนอคุณสมบัติขั้นสูงมากกว่า 300 รายการเพื่อปรับปรุงงานที่ซับซ้อน เพิ่มความคิดสร้างสรรค์และประสิทธิภาพ เสริมด้วยความสามารถด้าน AI, Kutools ทำงานอัตโนมัติด้วยความแม่นยำ ทำให้การจัดการข้อมูลเป็นเรื่องง่าย ข้อมูลโดยละเอียดของ Kutools for Excel...         ทดลองฟรี...

1. เลือกช่วงที่คุณต้องการค้นหาว่าค่าของเซลล์มีอยู่หรือไม่จากนั้นคลิก Kutools > เลือก > เลือกเซลล์เฉพาะ

คลิกเลือกคุณสมบัติเซลล์เฉพาะของ kutools

2 ใน เลือกเซลล์เฉพาะ กล่องโต้ตอบเลือกไฟล์ เซลล์ ตัวเลือกใน ประเภทการเลือก จากนั้นเลือก เท่ากับ ในครั้งแรก ประเภทเฉพาะ รายการแบบเลื่อนลงและพิมพ์ค่าเซลล์ในกล่องข้อความถัดไปจากนั้นคลิกที่ไฟล์ OK ปุ่ม

กำหนดเกณฑ์ในกล่องโต้ตอบ

หากค่าของเซลล์มีอยู่ในช่วงที่ระบุคุณจะได้รับกล่องข้อความต่อไปนี้คลิก OK เซลล์จะถูกเลือก

หากค่าเซลล์มีอยู่ กล่องโต้ตอบจะปรากฏขึ้น

มิฉะนั้นคุณจะได้รับกล่องข้อความตามภาพด้านล่างที่แสดง

ถ้าค่าเซลล์ไม่มีอยู่ กล่องโต้ตอบอื่นจะปรากฏขึ้น

  หากคุณต้องการทดลองใช้ยูทิลิตีนี้ฟรี (30 วัน) กรุณาคลิกเพื่อดาวน์โหลดแล้วไปใช้การดำเนินการตามขั้นตอนข้างต้น


บทความที่เกี่ยวข้อง:

สุดยอดเครื่องมือเพิ่มผลผลิตในสำนักงาน

🤖 Kutools AI ผู้ช่วย: ปฏิวัติการวิเคราะห์ข้อมูลโดยยึดตาม: การดำเนินการที่ชาญฉลาด   |  สร้างรหัส  |  สร้างสูตรที่กำหนดเอง  |  วิเคราะห์ข้อมูลและสร้างแผนภูมิ  |  เรียกใช้ฟังก์ชัน Kutools...
คุณสมบัติยอดนิยม: ค้นหา เน้น หรือระบุรายการที่ซ้ำกัน   |  ลบแถวว่าง   |  รวมคอลัมน์หรือเซลล์โดยไม่สูญเสียข้อมูล   |   รอบโดยไม่มีสูตร ...
การค้นหาขั้นสูง: VLookup หลายเกณฑ์    VLookup หลายค่า  |   VLookup ข้ามหลายแผ่น   |   การค้นหาที่ไม่ชัดเจน ....
รายการแบบเลื่อนลงขั้นสูง: สร้างรายการแบบหล่นลงอย่างรวดเร็ว   |  รายการแบบหล่นลงขึ้นอยู่กับ   |  เลือกหลายรายการแบบหล่นลง ....
ผู้จัดการคอลัมน์: เพิ่มจำนวนคอลัมน์เฉพาะ  |  ย้ายคอลัมน์  |  สลับสถานะการมองเห็นของคอลัมน์ที่ซ่อนอยู่  |  เปรียบเทียบช่วงและคอลัมน์ ...
คุณสมบัติเด่น: กริดโฟกัส   |  มุมมองการออกแบบ   |   บาร์สูตรใหญ่    สมุดงานและตัวจัดการชีต   |  ห้องสมุดทรัพยากร (ข้อความอัตโนมัติ)   |  เลือกวันที่   |  รวมแผ่นงาน   |  เข้ารหัส/ถอดรหัสเซลล์    ส่งอีเมลตามรายการ   |  ซุปเปอร์ฟิลเตอร์   |   ตัวกรองพิเศษ (กรองตัวหนา/ตัวเอียง/ขีดทับ...) ...
ชุดเครื่องมือ 15 อันดับแรก12 ข้อความ เครื่องมือ (เพิ่มข้อความ, ลบอักขระ, ... )   |   50 + แผนภูมิ ประเภท (แผนภูมิ Gantt, ... )   |   40+ ใช้งานได้จริง สูตร (คำนวณอายุตามวันเกิด, ... )   |   19 การแทรก เครื่องมือ (ใส่ QR Code, แทรกรูปภาพจากเส้นทาง, ... )   |   12 การแปลง เครื่องมือ (ตัวเลขเป็นคำ, การแปลงสกุลเงิน, ... )   |   7 ผสานและแยก เครื่องมือ (แถวรวมขั้นสูง, แยกเซลล์, ... )   |   ... และอื่น ๆ

เพิ่มพูนทักษะ Excel ของคุณด้วย Kutools สำหรับ Excel และสัมผัสประสิทธิภาพอย่างที่ไม่เคยมีมาก่อน Kutools สำหรับ Excel เสนอคุณสมบัติขั้นสูงมากกว่า 300 รายการเพื่อเพิ่มประสิทธิภาพและประหยัดเวลา  คลิกที่นี่เพื่อรับคุณสมบัติที่คุณต้องการมากที่สุด...


แท็บ Office นำอินเทอร์เฟซแบบแท็บมาที่ Office และทำให้งานของคุณง่ายขึ้นมาก

  • เปิดใช้งานการแก้ไขและอ่านแบบแท็บใน Word, Excel, PowerPoint, ผู้จัดพิมพ์, Access, Visio และโครงการ
  • เปิดและสร้างเอกสารหลายรายการในแท็บใหม่ของหน้าต่างเดียวกันแทนที่จะเป็นในหน้าต่างใหม่
  • เพิ่มประสิทธิภาพการทำงานของคุณ 50% และลดการคลิกเมาส์หลายร้อยครั้งให้คุณทุกวัน!