VBA SendKeys - एक्सेल VBA SendKeys विधि का उपयोग करने के उदाहरण

एक्सेल VBA SendKeys

VBA भाषा में SendKeys एक विधि है जिसका उपयोग सक्रिय विंडो में कीस्ट्रोक भेजने के लिए किया जाता है ताकि हम उसके बाद मैन्युअल रूप से काम कर सकें। जब भी हम अल्फ़ाज़ों का उपयोग करते हैं तो कुंजियों के रूप में सभी अल्फ़ाज़ों को लोअरकेस वर्णों में होना चाहिए। यह एक जटिल विधि है और यदि आवश्यक हो तो ही उपयोग करने की सलाह दी जाती है

"SendKeys" समझने के लिए जटिल विषयों में से एक है। हम में से बहुत से लोग VBA में इस सुविधा का उपयोग नहीं करते हैं, लेकिन अधिक विषयों पर अधिक ज्ञान होना हमेशा अच्छी बात है। इस लेख में, हम आपको SendKeys फ़ंक्शन का उपयोग करने का तरीका दिखाएंगे। आपको तेज और बेहतर सीखने के लिए व्यावहारिक दृष्टिकोण के साथ कई बार लेख को फिर से पढ़ना मुश्किल हो सकता है।

वाक्य - विन्यास

नीचे VBA SendKeys पद्धति का सिंटैक्स है।

कीज़ या स्ट्रिंग: जिस तरह की कुंजी हमें सक्रिय एप्लिकेशन को भेजने की आवश्यकता होती है।

प्रतीक्षा करें: इस तर्क में, हम दो चीजों का उपयोग कर सकते हैं, अर्थात, TRUE या FALSE।

• सही आप एक्सेल सौंपा के लिए इंतजार करना चाहते हैं, तो कुंजी मैक्रो को वापस नियंत्रण होने से पहले संसाधित करने के लिए।
• FALSE, यदि आप प्रतीक्षा पैरामीटर की उपेक्षा करते हैं , तो यह डिफ़ॉल्ट मान होगा। यदि आप FALSE चुनते हैं, तो सक्रिय विंडो में संसाधित की जाने वाली कुंजियों की प्रतीक्षा किए बिना एक्सेल जारी है।

कीबोर्ड के साथ हमारे द्वारा उपयोग की जाने वाली सामान्य कुंजी "Ctrl, Shift और ALT" हैं। तो SendKeys विधि के साथ, हमें उन्हें विशेष वर्णों के साथ उपयोग करने की आवश्यकता है। नीचे दी गई तालिका उपरोक्त तीन सामान्य कुंजियों के लिए विशेष वर्ण दर्शाती है।

अन्य कुंजियों में अलग-अलग कुंजी और वर्ण हैं। नीचे दी गई तालिका प्रत्येक कुंजी के लिए विस्तृत विवरण दर्शाती है।

आवश्यकता के अनुसार, हम उपरोक्त किसी भी कुंजी का उपयोग कर सकते हैं। कुछ व्यावहारिक उदाहरणों के साथ, हम आपको SendKeys का उपयोग करने का तरीका दिखाएंगे।

एक्सेल VBA SendKeys विधि का उपयोग करने के उदाहरण

उदाहरण 1

उदाहरण के लिए, नीचे दिए गए सेल मान को देखें।

हमारे पास तीन सेल में मान हैं, और पहली सेल में, हमारे पास "बैंगलोर" का मान है, और इस सेल के लिए, "कैपिटल सिटी ऑफ़ कर्नाटक" के रूप में एक टिप्पणी है।

अब “SendKeys” का उपयोग करते हुए, हम इस टिप्पणी को संपादित करने का प्रयास करते हैं।

एक्सेल शीट खोलें और विजुअल बेसिक एडिटर पर जाएं, VBA सबप्रोडेक्ट शुरू करें।

कोड:

उप Send_Keys_Example () समाप्ति उप

सबसे पहले, हमें टिप्पणी को संपादित करने के लिए टिप्पणी सेल का चयन करने की आवश्यकता है। इसलिए कोड RANGE ("A1") का उपयोग करें

कोड:

उप Send_Keys_Example () रेंज ("A1")। अंत का चयन करें उप

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

टिप्पणी संपादित करने के लिए, हम शॉर्टकट "Shift + F2" का उपयोग करते हैं ।

यदि आप इस कुंजी को दबाते हैं, तो यह टिप्पणी का संपादन होगा।

अब "SendKeys" विधि खोलें।

SendKeys विधि में, SHIFT कुंजी का उपयोग करने के लिए वर्ण "+" (प्लस चिह्न) है, इसलिए "+" साइन-इन कोड दर्ज करें।

अब प्लस साइन SHIFT कुंजी के रूप में काम करता है, SHIFT के साथ अगली कुंजी जो हम उपयोग करते हैं वह F2 कुंजी है। जब भी हम फ़ंक्शन कुंजियों का उपयोग करते हैं, तो हमें उन्हें घुंघराले कोष्ठक के साथ संलग्न करना होगा, इसलिए घुंघराले ब्रैकेट में फ़ंक्शन कुंजी F2 दर्ज करें।

कोड:

उप Send_Keys_Example () रेंज ("A1")। SendKeys चुनें "+ (F2)" उप उप

अब कोड निष्पादित करें और देखें कि हमें क्या मिलता है।

जब हम कोड को निष्पादित करने का प्रयास करते हैं, तो हमें ऊपर जैसा संदेश मिला। हमें जिन चीज़ों को ध्यान में रखना है उनमें से एक यह है कि हम मैक्रो को नहीं चला सकते हैं, जो विज़ुअल बेसिक एडिटर विंडो से "SendKeys" का उपयोग करता है।

हमें "मैक्रो" सूची से कोड को चलाने की आवश्यकता है।

पहले Visual Basic संपादक विंडो बंद करें।

"डेवलपर" टैब पर जाएं और "मैक्रो" पर क्लिक करें।

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

आप देख सकते हैं कि टिप्पणी संपादित करें विकल्प सक्षम है।

जैसा कि आप ऊपर देख सकते हैं, इसने संपादित टिप्पणी विकल्प खोलने के लिए SHIFT + F2 की शॉर्टकट कुंजी सौंपी है ।

उदाहरण # 2

उदाहरण के लिए, यदि आप SendKeys विधि के माध्यम से "पेस्ट स्पेशल" विंडो खोलना चाहते हैं, तो हम यह भी कर सकते हैं। सबसे पहले, हमें कुछ कोशिकाओं की प्रतिलिपि बनाने और फिर SendKeys का उपयोग करने की आवश्यकता है।

कोड:

उप Send_Keys_Example1 () रेंज ("A1")। प्रतिलिपि SendKeys "% es" अंतिम उप

उस मैक्रो को चुनें जिसे आपको चलाने की आवश्यकता है और फिर रन पर क्लिक करें।

जब आप कोड चलाते हैं, तो यह पेस्ट स्पेशल डायलॉग बॉक्स के नीचे खुल जाएगा।

याद रखने वाली चीज़ें

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