एक्सेल - VBA - एक अनुस्मारक बनाना
एक्सेल अक्सर डेटा में हेरफेर करने, विभिन्न प्रकार के डेटा से रिपोर्ट और चार्ट बनाने के लिए विकल्प होता है। हालाँकि, अन्य रोचक चीज़ों जैसे रिमाइंडर बनाने के लिए भी एक्सेल का उपयोग कर सकते हैं। यह VBA ढांचे का उपयोग करके किया जा सकता है। एक अनुस्मारक बनाने के लिए एक कस्टम VBA कोड लिखा जाना चाहिए जो इनबिल्ट फ़ंक्शंस में से कुछ का उपयोग करता है । हालाँकि, कोड को पहले उदाहरण में मैन्युअल रूप से चलाने की आवश्यकता होती है और जब तक कार्यपुस्तिका खुली रहती है तब तक यह अगले पुनरावृत्तियों के लिए चलता रहेगा। यदि उपयोगकर्ता कोड को मैन्युअल रूप से नहीं चलाना चाहता है, तो उन्हें वर्कबुक_ओपेन नामक एक कस्टम रूटीन को परिभाषित करना होगा।
मुद्दा
मैं एक्सेल वर्कशीट में दिनांक और समय के अनुसार स्वचालित रूप से एक रिमाइंडर संदेश बॉक्स प्राप्त करना चाहता हूं।
क्या यह VBA में किया जा सकता है?
उपाय
--- ए -------------- बी -------- सी ---------------------- डी 1- तिथि ------- समय ------ कार्य ------------------- याद दिलाएं 2- 13/3/2010 - 11:10 ---- स्वच्छ कक्ष -------------- X 3- 13/3/2010 - 11:10 ---- स्वच्छ कार ------------ ----- एक्स
X: इंगित करें कि यह एक सक्रिय अनुस्मारक है। उस अनुस्मारक को अक्षम करने के लिए x निकालें
VBE (ALT + F11) और प्रोजेक्ट एक्सप्लोरर विंडो में, "ThisWorkbook" पर डबल-क्लिक करें। नीचे दिए गए कोड को पेस्ट करें।
निजी कॉन्स्टेंट रिमाइंडर इंटेगर के रूप में = 1 निजी अनुस्मारक .CurrentRegion.Rows.Count इस एरो के लिए = 2 माय्रोस के लिए (यदि सेल (इसरो, "डी") = "एक्स") तो थीस्टाइम = सीडेट (सीडीट (सेलो, "ए") + सेल्स (इसरो, "बी ")) अगर ((थीस्टाइम> = अब) और (थीस्टिम <= अब + 1 * रिमाइंडर / (24 * 60))) तो कार्य = कार्य और vbCrLf और कक्ष (इसरो, " सी ") और" पर "और प्रारूप सेल रिमाइंडमे ”, ट्रू एंड सब
इसके अलावा आपको कुछ बातें समझने की जरूरत है:
- कोड को पहली बार मैन्युअल रूप से शुरू करने की आवश्यकता है। उसके बाद, जब तक आप पुस्तक को बंद नहीं करते, तब तक यह शेड्यूल की जाँच करता रहेगा जैसा आपने पुस्तक में परिभाषित किया है।
- एक बार जब आप पुस्तक को बंद कर देते हैं और उसे फिर से जारी करते हैं, तो आपको फिर से एक बार कोड शुरू करना होगा।
- कोड शुरू करने के लिए, आपको मैक्रो पर जाना होगा, और वहां आपको मेनू बार पर एक रन बटन मिलेगा।
- यदि आप मैन्युअल रूप से कोड नहीं चलाना चाहते हैं, और आप चाहते हैं कि जब भी आप पुस्तक शुरू करें तो कोड अपने आप चले, तो आपको वर्कबुक_ऑन () नामक एक रूटीन को परिभाषित करना होगा।
- इसलिए फिर से, यदि आप कोड को मैन्युअल रूप से चलाना चाहते हैं तो आप ठीक वैसा ही करते हैं जैसा आपने पहले किया था और यदि आप चाहते हैं कि जब भी किताब खोली जाए तो कोड अपने आप चले, तो आपको एक और जोड़ना होगा (हालांकि आप पुराने कोड को ही रखेंगे) )। कोड होगा:
निजी उप कार्यपुस्तिका_ओपन () कॉल रिमाइंडम एंड सब
ध्यान दें
मंच पर इस टिप के लिए rizvisa1 के लिए धन्यवाद।