จะแสดงกล่องข้อความได้อย่างไรหากค่าของเซลล์เปลี่ยนแปลงภายในช่วงใน Excel
บางครั้งคุณต้องเตือนตัวเองถึงการเปลี่ยนแปลงภายในช่วงในแผ่นงานบางแผ่น ดังนั้นกล่องข้อความป๊อปอัปจะช่วยคุณได้หากค่าของเซลล์มีการเปลี่ยนแปลงในช่วงหนึ่ง คุณสามารถบรรลุได้ด้วยวิธี VBA ในบทความนี้
ป๊อปอัพกล่องข้อความหากค่าของเซลล์เปลี่ยนแปลงภายในช่วงด้วยรหัส VBA
ป๊อปอัพกล่องข้อความหากค่าของเซลล์เปลี่ยนแปลงภายในช่วงด้วยรหัส VBA
รหัส VBA ต่อไปนี้จะปรากฏขึ้นในกล่องข้อความหากค่าของเซลล์เปลี่ยนแปลงภายในช่วงที่ระบุของแผ่นงานบางแผ่น กรุณาดำเนินการดังนี้
1 กด อื่น ๆ + F11 พร้อมกันเพื่อเปิดไฟล์ Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง
2 ใน Microsoft Visual Basic สำหรับแอปพลิเคชัน ดับเบิลคลิกที่ชื่อแผ่นงาน (มีช่วงที่ระบุอยู่) ในแถบด้านซ้ายเพื่อเปิด รหัส จากนั้นคัดลอกและวางโค้ด VBA ด้านล่างลงในหน้าต่าง
รหัส VBA: กล่องข้อความป๊อปอัพหากค่าของเซลล์เปลี่ยนแปลงภายในช่วง
Private Sub Worksheet_Change(ByVal Target As Range)
If Not (Application.Intersect(Range("A1:E19"), Target) Is Nothing) Then
MsgBox "Cell " & Target.Address & " has changed.", vbInformation, "Kutools for Excel"
End If
End Sub
หมายเหตุ: คุณสามารถเปลี่ยนช่วงที่ระบุ A1: E19 ในรหัสเป็นช่วงที่คุณต้องการ
3 กด อื่น ๆ + Q ในเวลาเดียวกันเพื่อปิดไฟล์ Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง
ในตอนนี้เมื่อค่าของเซลล์ในช่วง A1: E19 เปลี่ยนไปกล่องข้อความจะปรากฏขึ้นโดยอัตโนมัติ ดูภาพหน้าจอ:

ปลดล็อก Excel Magic ด้วย Kutools AI
- การดำเนินการอย่างชาญฉลาด: ดำเนินการกับเซลล์ วิเคราะห์ข้อมูล และสร้างแผนภูมิ ทั้งหมดนี้ขับเคลื่อนด้วยคำสั่งง่ายๆ
- สูตรที่กำหนดเอง: สร้างสูตรที่ปรับแต่งโดยเฉพาะเพื่อปรับปรุงขั้นตอนการทำงานของคุณ
- การเข้ารหัส VBA: เขียนและใช้งานโค้ด VBA ได้อย่างง่ายดาย
- การตีความสูตร: เข้าใจสูตรที่ซับซ้อนได้อย่างง่ายดาย
- การแปลข้อความ: ทลายกำแพงด้านภาษาภายในสเปรดชีตของคุณ
สุดยอดเครื่องมือเพิ่มผลผลิตในสำนักงาน
เพิ่มพูนทักษะ Excel ของคุณด้วย Kutools สำหรับ Excel และสัมผัสประสิทธิภาพอย่างที่ไม่เคยมีมาก่อน Kutools สำหรับ Excel เสนอคุณสมบัติขั้นสูงมากกว่า 300 รายการเพื่อเพิ่มประสิทธิภาพและประหยัดเวลา คลิกที่นี่เพื่อรับคุณสมบัติที่คุณต้องการมากที่สุด...
แท็บ Office นำอินเทอร์เฟซแบบแท็บมาที่ Office และทำให้งานของคุณง่ายขึ้นมาก
- เปิดใช้งานการแก้ไขและอ่านแบบแท็บใน Word, Excel, PowerPoint, ผู้จัดพิมพ์, Access, Visio และโครงการ
- เปิดและสร้างเอกสารหลายรายการในแท็บใหม่ของหน้าต่างเดียวกันแทนที่จะเป็นในหน้าต่างใหม่
- เพิ่มประสิทธิภาพการทำงานของคุณ 50% และลดการคลิกเมาส์หลายร้อยครั้งให้คุณทุกวัน!