VBA मान - एक्सेल VBA वैल्यू प्रॉपर्टी का उपयोग कैसे करें? (उदाहरण)

एक्सेल VBA मूल्य संपत्ति

मान VBA में एक गुण है जिसका उपयोग किसी विशिष्ट श्रेणी के लिए मान निर्दिष्ट करने के लिए रेंज विधि के साथ किया जाता है, यह VBA में एक अंतर्निर्मित अभिव्यक्ति है, उदाहरण के लिए, यदि हम रेंज ("B3") का उपयोग करते हैं। मान = 3 यह निर्दिष्ट करेगा। सेल बी 3 का मान 3 है, जरूरी नहीं कि वैल्यू प्रॉपर्टी का इस्तेमाल केवल रेंज मेथड के साथ ही हो, हम इसे दूसरे फंक्शन के साथ भी इस्तेमाल कर सकते हैं।

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

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

VBA में वैल्यू प्रॉपर्टी का उपयोग कैसे करें?

उदाहरण # 1 - रेंज ऑब्जेक्ट को सेल में असाइन करने के लिए

• उदाहरण के लिए, यदि आप सेल A1 में मान सम्मिलित करना चाहते हैं, तो आपको सेल A1 को इस रेंज की तरह संदर्भित करना चाहिए ("A1")

कोड:

सब वैल्यू () रेंज ("A1") एंड सब

• RANGE ऑब्जेक्ट का उपयोग करके सेल को संदर्भित करने के बाद, अब इस ऑब्जेक्ट से जुड़े सभी गुणों और विधियों की IntelliSense सूची देखने के लिए एक डॉट (।) डालें।

कोड:

उप मान () रेंज ("A1")। अंत उप

• इस विकल्प के विभिन्न रूपों को चुनें, संपत्ति का चयन करें "VALUE।"

कोड:

सब वैल्यू () रेंज ("A1")। वैल्यू एंड सब

• एक बार जब "VALUE" संपत्ति का चयन किया जाता है, तो हमें मूल्य को समान चिह्न में रखकर सेल A1 में मान सेट करना होगा।

कोड:

उप मान () रेंज ("A1")। मान = "VBA में आपका स्वागत है" उप उप

• ठीक है, यह "A1 में VBA में आपका स्वागत है" मान डालेगा।

• यदि आप एक ही मूल्य को कई कोशिकाओं में सम्मिलित करना चाहते हैं, तो नीचे दिए गए कोड की तरह कोशिकाओं को देखें।

कोड:

उप मान () रेंज ("A1: A5")। मान = "VBA में आपका स्वागत है" उप उप

• यह कक्ष A1 से A5 तक मान सम्मिलित करेगा ।

• यदि आप विभिन्न कक्षों में मान सम्मिलित करना चाहते हैं, लेकिन सेल की श्रृंखला के लिए नहीं, तो हमें नीचे दिए गए अलग-अलग तर्कों में कोड और सेल पते का उपयोग करने की आवश्यकता है।

कोड:

उप मान () रेंज ("A1, A5, B4, C2")। मान = "VBA में आपका स्वागत है" अंतिम उप

• यह A1, A5, B4, और C2 कक्षों में "VBA में आपका स्वागत है" पाठ सम्मिलित करेगा ।

उदाहरण # 2 - CELLS संपत्ति का उपयोग कर मूल्य डालें

RANGE ऑब्जेक्ट के माध्यम से नहीं, बल्कि VBA CELLS संपत्ति का उपयोग करके, हम मान डाल सकते हैं। लेकिन CELLS ऑब्जेक्ट के साथ समस्याओं में से एक यह है कि हमें IntelliSense सूची तक पहुंच प्राप्त नहीं है क्योंकि हमें RANGE ऑब्जेक्ट के लिए मिला है।

यहां हमें पंक्ति और स्तंभ संख्याओं का उल्लेख करना होगा जो हमें मूल्य डालने की आवश्यकता है। उदाहरण के लिए, यदि आप सेल A1 में मान सम्मिलित करना चाहते हैं, तो कोड CELLS (1,1) है। यदि आप सेल B5 में मान सम्मिलित करना चाहते हैं, तो कोड CELLS (5,2) है, अर्थात B5 सेल के बराबर।

हम CELLS संपत्ति का उपयोग करके कई कोशिकाओं में मान नहीं डाल सकते हैं। यह हमारी RANGE ऑब्जेक्ट के विपरीत है।

उदाहरण # 3 - सेल वैल्यू प्राप्त करें

हमने देखा है कि कोशिकाओं में मान कैसे डालें, अब हम देखेंगे कि कोशिकाओं से मान कैसे प्राप्त करें।

चरण 1: स्ट्रिंग के रूप में एक चर को परिभाषित करें।

कोड:

सब वैल्यू () डिम के अस स्ट्रिंग एंड सब

चरण 2: इस चर "k" के लिए, हम सेल A1 के मान को असाइन करेंगे। कक्ष A1 में मैंने "VBA में आपका स्वागत है" मान दर्ज किया है।

तो कोड k = Range ("A1") होगा। मान

कोड:

सब वैल्यू () डिम K अस स्ट्रिंग K = रेंज ("A1")। वैल्यू एंड सब

चरण 3: VBA संदेश बॉक्स में चर "k" का परिणाम दिखाएं।

कोड:

सब वैल्यू () डिम K अस स्ट्रिंग K = रेंज ("A1")। मान MsgBox K एंड सब

कोड चलाकर, हमें संदेश बॉक्स में सेल A1 मान का परिणाम होना चाहिए।

सेल A1 का डेटा प्राप्त करने के लिए हम RANGE ऑब्जेक्ट का भी उपयोग कर सकते हैं। नीचे दिया गया कोड आपको वही दिखाएगा।

कोड:

सब वैल्यू () डिम K स्टिंग सेट सेलवैल्यू = रेंज ("A1") MsgBox CellValue एंड सब

यह संदेश बॉक्स में सेल A1 का मान भी प्राप्त करना चाहिए।

उदाहरण 4 - एक सेल मान की आवश्यकता होने पर त्रुटि मान

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

कोड:

सब वैल्यू () डिम K अस रेंज रेंज सेलवैल्यू = रेंज ("A1: A5") MsgBox सेलवैल्यू सब उप

यदि आप उपरोक्त कोड चलाते हैं, तो हमें "टाइप मिसमैच" त्रुटि मिलेगी।

इसका कारण हमें यह त्रुटि मिलती है क्योंकि जब ऑब्जेक्ट वैरिएबल एक से अधिक सेल "वैल्यू" पर सेट होता है, तो प्रॉपर्टी वास्तव में यह नहीं समझती है कि किस सेल वैल्यू को दिया जाना है, इसलिए यह एक बार में एक सेल वैल्यू प्राप्त कर सकता है।