एक्सेल में व्यावसायिक प्रक्रियाओं का स्वचालन या किसी लड़की को प्रसंस्करण से कैसे बचाया जाए

मेरी प्रेमिका वितरण नेटवर्क में खरीदारी करने में लगी हुई है। हाल ही में, कंपनी में एक बड़ी कमी आई है, इसलिए प्रति कर्मचारी काम की मात्रा में नाटकीय रूप से वृद्धि हुई है। इसलिए, उसे नियमित रूप से काम पर रहना पड़ता था, कभी-कभी शनिवार को भी बाहर जाना पड़ता था। उसके साथियों को भी यही समस्या थी।



उस निर्णय के बारे में जिसने मेरी प्रेमिका को समय पर घर लौटने की अनुमति दी, आप कट के नीचे पढ़ सकते हैं।

इसके अलावा, उन्होंने जो कुछ किया, उसका एक महत्वपूर्ण हिस्सा स्वचालित हो सकता है: सामने से डेटा प्राप्त करना, एक्सेल दस्तावेज़ भरना, सामने डेटा अपडेट करना आदि।

इस स्थिति में सबसे उचित बात यह हो सकती है कि आवश्यक कार्यक्षमता के विकास पर काम का एक बयान लिखना है और इसे अधिकारियों के माध्यम से डेवलपर्स को देना है। हालांकि, कमी ने डेवलपर्स सहित सभी को प्रभावित किया। नतीजतन, इस स्वचालन को लागू करने के लिए उनके पास पर्याप्त संसाधन नहीं थे। और कंपनी ने निकट भविष्य में विशेष आरपीए सिस्टम खरीदने की योजना नहीं बनाई।

इसके अलावा, कर्मचारियों पर काम करने और वे किन अनुप्रयोगों में काम करते हैं, की बढ़ती निगरानी।

इन सभी प्रतिकूल परिस्थितियों के परिणाम और मदद करने की मेरी हताश इच्छा के आधार पर, मैंने वीबीए में एक्सेल के लिए फ़ंक्शन लिखने का फैसला किया, जिसके लिए मेरी प्रेमिका और उसके सहयोगियों के नियमित संचालन को स्वचालित करना संभव होगा।

उत्पाद आवश्यकताओं

शुरुआती बिंदु के रूप में, मैंने उस कार्य को चुना जिसके लिए लड़की ने अपनी भावनाओं के अनुसार सबसे अधिक समय बिताया। इस कार्य के हिस्से के रूप में, लड़की को जरूरत थी:

• एक्सेल फाइल से आर्टिकल नंबर को फ्रंट-ऑफिस सिस्टम सर्च बार में ट्रांसफर करें;
• इस लेख के लिए, खोज परिणामों से, खरीद, बिक्री मूल्य, अतिरिक्त मूल्यों की एक संख्या प्राप्त करें;
• अंतिम उत्पाद मूल्य बनाने के लिए एक्सेल में एकत्रित डेटा को संसाधित करें;
• सिस्टम पर कीमतें वापस अपलोड करें।
• प्रति दिन अनलोडिंग और बाद में डेटा लोड होने में लगभग 3 घंटे लगते हैं।

यह देखते हुए कि मेरी प्रेमिका को प्रोग्रामिंग ज्ञान नहीं था, एक्सेल में कार्यों के रूप में एक सरल और परिचित इंटरफ़ेस के साथ एक उपकरण बनाना आवश्यक था। कार्यों के अनुक्रम को केवल कार्यों के अनुक्रम के रूप में परिभाषित किया जाना चाहिए। संक्षेप में, KISS में।

इस मामले के आधार पर, मैंने निम्नलिखित कार्यात्मक आवश्यकताओं का गठन किया:

• स्क्रीन पर संबंधित तत्वों को उजागर करने के लिए माउस (चाल, कीस्ट्रोक) को नियंत्रित करें;
• डेटा दर्ज करने के लिए कीबोर्ड पर एक कीस्ट्रोक का अनुकरण करें;
• एक्सेल से तृतीय-पक्ष अनुप्रयोगों में डेटा स्थानांतरित करें;
• एक्सेल में एक एप्लिकेशन से डेटा पुनर्प्राप्त करना;
• एक्सेल में एक फार्मूला खींचते समय समान संचालन करना।

माउस और पहली कठिनाइयों

कहीं भी कर्सर ले जाने से पहले, आपको यह समझने की आवश्यकता है कि इसे कहाँ स्थानांतरित करना है। यह मुझे इस स्थिति में सबसे उचित लगता है कि किसी निश्चित तत्व के ऊपर कर्सर की स्थिति को याद रखें। निर्देशांकों को याद रखने के लिए, मैंने यूजर 32 लाइब्रेरी से GetCursorPos फ़ंक्शन का उपयोग किया।

ठीक है, हमें निर्देशांक मिला है, अब उन्हें याद करना अच्छा होगा। खैर, वहाँ कुछ भी जटिल नहीं है, मैंने सोचा, बस सक्रिय सेल से एक या दो कोशिकाओं की गणना करें और निर्देशांक X और Y लिख दें। हालांकि, ActiveCell.Offset (0, 1) .Value = x ने काम नहीं किया। मान नहीं बदला है। और निष्पादन के परिणामस्वरूप, एक त्रुटि। विभिन्न मान्यताओं की जाँच करने के बाद, यह पता चला कि शीट पर मूल्य बदलने से पूरी शीट का एक रीकाउंट होता है, और इसलिए यह रिकॉल का कारण बनता है। इस प्रतिबंध के चारों ओर जाने के लिए, कुछ कार्यों के एक फ़ंक्शन से सीधे कॉल के बजाय, इन कॉलों को मूल्यांकन के साथ बदलना आवश्यक था, जिससे हमें वांछित परिणाम प्राप्त करने की अनुमति मिली।

परिणाम PrintCursorPosition () फ़ंक्शन था, जो फ़ंक्शन निष्पादित किए जाने के समय कर्सर स्थिति के दाईं ओर दो कक्षों में रिकॉर्ड किया गया था। फॉर्मूला में प्रवेश के लिए क्षेत्र में PrintCursorPosition () टाइप करना, कर्सर ले जाना और कीबोर्ड पर एंटर प्रेस करना आवश्यक था।

माउस को स्थानांतरित करने के लिए, मैंने उसी user32 लाइब्रेरी से SetCursorPos का उपयोग किया। इस फ़ंक्शन का उपयोग करने के लिए, इसे x और y निर्देशांक के मान को पास करने की आवश्यकता थी जो पहले इसे एक इनपुट के रूप में संग्रहीत किया गया था। SetCursorPosition (x, y) का उपयोग करके, मैं पहले से संग्रहीत निर्देशांकों पर कर्सर ले जाने में सक्षम था। पहला दृश्यमान परिणाम। हुर्रे!

माउस क्रियाओं का अनुकरण करने के लिए, मैंने उसी user32 लाइब्रेरी से mouse_event का उपयोग किया। कुंजी के झंडे को इनपुट में पास करके, मैं संबंधित कुंजी के कीस्ट्रोक को अनुकरण करने में सक्षम था। प्रारंभ में, मैंने एक फ़ंक्शन माउसबटनप्रीस (ध्वज) लिखने की योजना बनाई, जहां ध्वज दबाए गए कुंजी का पदनाम है, लेकिन पहले प्रदर्शन के बाद, लड़की ने महसूस किया कि कार्यों के समूह को प्रतिस्थापित करना बेहतर था LeftClick (), RightClick () और DoubleClick ()। यह दृष्टिकोण परिणामी फ़ंक्शन को पढ़ना आसान बनाता है।

कीबोर्ड

VBA में, SendKeys कथन है जो सभी आवश्यक क्रिया करता है। पाठ आसानी से सेल के संदर्भ में फ़ंक्शन के पास जाता है और समस्याओं के बिना पूरा होता है। हालांकि, विशेष कुंजी (Enter, Tab, Alt, Ctrl, कीबोर्ड तीर, आदि) को दबाने से अस्वीकृति का कारण बना (उन्हें दबाने के लिए, उन्हें घुंघराले कोष्ठक (ENTER) में लिखना आवश्यक था)। इसलिए, सबसे अधिक इस्तेमाल किए जाने वाले लोगों के लिए, मैंने प्रेसएंटर () जैसे फ़ंक्शन लिखे। शायद ही कभी इस्तेमाल किए गए लोगों के लिए, मैंने उसी दस्तावेज़ में एक धोखा पत्र बनाया।

सिस्टम और एक्सेल के बीच बफर को कॉपी करने और बफर से चिपकाने के बीच जानकारी स्थानांतरित की गई थी। नियंत्रण + सी का अनुकरण करके बफर को कॉपी करना अनिवार्य रूप से किया गया था, जिसके बाद बफर से डेटा को MSForms.DataObject में ले जाया गया और एक विशिष्ट सेल में स्थानांतरित कर दिया गया।

परीक्षण और प्रदर्शन के मुद्दे

समस्याएं अभी शुरू हुईं।

क्रियाओं का एक स्क्रिप्ट अनुक्रम लिखने की प्रक्रिया में क्रियाओं के छोटे समूहों को काम करना और उन्हें एक में संयोजित करना शामिल है। लेकिन जब एक नि: शुल्क सेल पर स्विच किया जाता है, तो पूरे अनुक्रम को तुरंत काम किया जाता था, जो बेहद कष्टप्रद था, खासकर अगर कार्रवाई के समूह के लिए 10 सेकंड से अधिक समय लगे। इस समस्या को हल करने के लिए, मैंने फ़ंक्शन नाम के सक्रिय सेल के सूत्र पाठ में उपस्थिति के लिए जाँच की। इससे मदद मिली।

इसके अलावा, परीक्षण के दौरान, उन्होंने प्रतीक्षा समारोह (सेकंड) और WaitMS (मिलिसेकंड) को जोड़ा, ताकि जो काम किया और क्या नहीं किया, उसका ट्रैक रखा जा सके। यह कर्नेल 32 लाइब्रेरी से स्लीप पर आधारित है। WaitS और WaitMS के बीच अंतर यह है कि WaitMS में समय मिलीसेकंड में होता है, और WaitS में सेकंड में।

एक अन्य समस्या कोशिकाओं में खींचे जाने पर कार्यों के असंगत निष्पादन की थी। यह एक्सेल की अतुल्यकालिक गणना के कारण था। उन्होंने प्रत्येक सेल की गणना अलग-अलग प्रोसेसरों में वितरित की। नतीजतन, अनुक्रम पहले सेल दो में निष्पादित किया जाता है, फिर पांचवें में, फिर तीसरे में, आदि। इसके अलावा, अनुक्रम खुद को बिना किसी समस्या के शुरू से अंत तक किया गया था। इस व्यवहार से छुटकारा पाने के लिए, मैंने एक्सेल सेटिंग्स (एक्सेल सेटिंग्स -> एडवांस -> फॉर्मूला) में बहु-थ्रेडेड कैलकुलेशन को बंद कर दिया।

परिणाम

इस सब के साथ काम करने के तरीके के बारे में बताने और इसे इस्तेमाल करने का तरीका सीखने के बाद, उन्होंने अपनी प्रेमिका को इतने कृतघ्न तरीके से कंपनी में प्रक्रियाओं को स्वचालित करने दिया।

इस तरह के स्वचालन के लिए धन्यवाद, यह तीन घंटे से 30 मिनट तक के समय को कम करने के लिए निकला। उसी समय, स्वचालन ने डेटा को अपलोड करने और डाउनलोड करने की प्रक्रिया के लिए दृष्टिकोण को थोड़ा बदलना संभव बना दिया। अब अनलोडिंग उस समय होती है जब मेरी प्रेमिका दोपहर के भोजन और रात को लोडिंग के लिए निकलती है। इस प्रकार, हम कह सकते हैं कि लोड लगभग आधे कार्य दिवस तक कम हो गया, जिसने मेरी प्रेमिका को समय पर घर लौटने की अनुमति दी और हम स्वचालन से अधिक दिलचस्प चीजें कर सकते हैं।