excel - VBA code doesn't run when cell is changed by a formula -

वर्कशीट ए उन डेटा की श्रेणियां जो वर्कशीट बी । वर्कशीट ए एक मैक्रो है जो गणना करता है कि डेटा मूल्य से ऊपर है, तो चयनित उपयोगकर्ताओं को ईमेल करने के लिए एक ईमेल मॉड्यूल कॉल करता है।

जब डेटा मैन्युअल रूप से वर्कशीट ए मैक्रो कार्यों पर इनपुट होता है, लेकिन जब डेटा वर्कशीट बी से खींच लिया जाता है तो यह आग नहीं है।

मुझे यकीन नहीं है कि मुझे अपने VBA कोड में बदलने की क्या आवश्यकता है। MailAlert (लक्ष्य, "बी 5: एम 5", 4) कॉल आइएलएआरर्ट (लक्ष्य, "बी 8: एम 8", 7) कॉल आइएलएआरर्ट (लक्ष्य, "B11: M11", कॉल) MailAlert (लक्ष्य, "बी 14: एम 14", 2) कॉल मेलअर्लर्ट (लक्ष्य, "बी 17: एम 17", 4) कॉल मेलअर्लर्ट (लक्ष्य, "बी 20: एम 20", 1) कॉल मेलअर्लर्ट ( कॉल, "B23: M23", 3) मेलएल्र्ट (लक्ष्य, "बी 32: एम 32", 1) कॉल करें MailAlert (लक्ष्य, "B26: M26", 1) कॉल मेलअर्लर्ट (लक्ष्य, "B29: M29", 5) कॉल करें MailAlert (लक्ष्य, "B32: M32", 1) कॉल करें मेलएल्र्ट (लक्ष्य, "बी 35: एम 35", 7) मेलएल्र्ट को कॉल करें (लक्ष्य, "B38: M38", 20) मेलएल्र्ट को कॉल करें (लक्ष्य, "बी 41: एम 41", 0) अंत उप प्राइवेट सब मेलएल्र्ट (बाईवैल टारगेट रेंज, बाय वैल स्ट्रिंग के रूप में पता, पूर्णांक के रूप में बाय वैल वैल्यू) यदि लक्ष्य। कॉल। गणना & gt; 1 फिर से बाहर निकलें यदि आवेदन नहीं है। इंटरसेक्ट (रेंज (पता), लक्ष्य) तब कुछ नहीं है, यदि यदि नैनोमीटर (लक्ष्य। मूल्य) और लक्ष्य। मूल्य & gt; मान तो कॉल Mail_small_Text_Outlook समापन अगर आवेदन.सक्षम एव्हेंट्स = ट्रू एंड एंड एंड एंड

कब्जा करने के लिए आपके द्वारा Worksheet_Calculate () ईवेंट का उपयोग करने के लिए सूत्र के द्वारा किए गए परिवर्तन यह कैसे काम करता है यह समझने के लिए, चलिए एक उदाहरण लेते हैं।

1. एक नई कार्यपुस्तिका बनाएं।
2. शीट 1 सेल A1 में, यह सूत्र = Sheet2! A1 + 1 को रखें

   अब एक कोड में इस कोड को पेस्ट करें

     सार्वजनिक PrevVal जैसा संस्करण   
    इसे चिपकाएं शीट कोड क्षेत्र  
     निजी उप वर्कशीट टैग () यदि रेंज ("ए 1")। मान & lt; & gt; पूर्ववर्ती   
    और अंत में  ThisWorkbook  कोड क्षेत्र इस कोड को पेस्ट करें <   
    कार्यपुस्तिका को बंद करें और सहेजें और इसे फिर से खोलें। अब  शीट 2  के कक्ष A1 में कोई बदलाव करें। आप देखेंगे कि आपको संदेश बॉक्स  MsgBox "मान परिवर्तित" प्राप्त होगा   
     SNAPSHOTS