จะเรียกใช้แมโครโดยอัตโนมัติเมื่อผลลัพธ์ของสูตรเซลล์เปลี่ยนแปลงได้อย่างไร

สมมติว่าฉันมีรายการสูตรตามข้อมูลในคอลัมน์ A และคอลัมน์ B ตามภาพหน้าจอต่อไปนี้ที่แสดงตอนนี้ฉันต้องการเรียกใช้รหัสแมโครเฉพาะโดยอัตโนมัติเมื่อผลลัพธ์ของสูตรเปลี่ยนแปลงเมื่อเซลล์สัมพัทธ์เปลี่ยนไป มีความคิดที่ดีในการแก้ปัญหานี้ใน Excel หรือไม่?

เรียกใช้แมโครโดยอัตโนมัติเมื่อผลลัพธ์ของสูตรเซลล์เปลี่ยนแปลงด้วยรหัส VBA

เรียกใช้แมโครโดยอัตโนมัติเมื่อผลลัพธ์ของสูตรเซลล์เปลี่ยนแปลงด้วยรหัส VBA

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

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

รหัส VBA: เรียกใช้แมโครโดยอัตโนมัติเมื่อผลลัพธ์ของสูตรเซลล์เปลี่ยนแปลง:

Private Sub Worksheet_Calculate()
'Updateby Extendoffice
    Dim Xrg As Range
    Set Xrg = Range("C2:C8")
    If Not Intersect(Xrg, Range("C2:C8")) Is Nothing Then
    Macro1
    End If
End Sub

หมายเหตุ: ในโค้ดด้านบน C2: C8 คือช่วงของเซลล์สูตรที่คุณต้องการใช้，มาโค1 คือชื่อของแมโครที่คุณต้องการเรียกใช้โดยอัตโนมัติ โปรดเปลี่ยนตามความต้องการของคุณ

2. จากนั้นบันทึกและปิดหน้าต่างรหัสนี้ตอนนี้เมื่อข้อมูลในช่วง A2: B8 เปลี่ยนแปลงเพื่อทำให้ผลลัพธ์ของสูตรเปลี่ยนแปลงรหัสแมโครเฉพาะของคุณจะถูกทริกเกอร์พร้อมกัน