दोस्तों जैसे कि हम आपको पहले ही बता चुके हैं VBA MACRO में सेल (CELL) बहुत महत्वपूर्ण टॉपिक है क्योंकि हमे जो भी प्रोग्रामिंग करनी है वो Cell के लिए ही करनी है, तो सेल का नॉलेज होना हमारे लिए बहुत जरूरी है तो सबसे पहले बात करते है की हम किसी CELL को कैसे पहचाने।
हम दो तरह से CELL की VALUE, CELL का Reference ले सकते हैं
CELL के उपयोग से : CELL(5, 3).Value = “Hi”
RANGE का उपयोग करना: RANGE (“C5”).Value = “Hi”
CELL वास्तव में Excel worksheet CELL होती हैं, हम CELL को एक RANGE प्रॉपर्टी के रूप में संदर्भित करते हैं जिसे हम वास्तव में करेक्ट CELL के रूप में संदर्भित करते हैं, दूसरे शब्दों में, CELL का उपयोग रेंज प्रॉपर्टी के साथ किया जाता है और CELL प्रॉपर्टी का उपयोग करने का तरीका रेंज के अनुसार होता है ( .Cells (1,1) अब CELL (1,1) का अर्थ है हम CELL “A1” में हैं, जिसमे पहला “1” कॉलम होता है और दूसरा “1” Row पोजीशन होती है ।
VBA CELL बारे में जानने के लिए आपको किसी विशेष परिचय की आवश्यकता नहीं है। VBA CELL और EXCEL CELL समान होती हैं, जो सामान्य एक्सेल CELL से अलग नहीं होती हैं। VBA CELL की अवधारणा के बारे में अधिक जानकारी के लिए इस लेख को ध्यान से पढ़े।
मुझे यकीन है कि अभी भी आपके दिमाग में यह सवाल चल रहा होगा। VBA में, रेंज एक ऑब्जेक्ट है, लेकिन सेल एक एक्सेल शीट की प्रॉपटी है। तो आप जान लीजिये की VBA में, हमारे पास सेल ऑब्जेक्ट को रेंज के माध्यम से संदर्भित किया जाता है और इसको संदर्भित करने के दो तरीके होते है।
उदाहरण के लिए, यदि आप सेल C5 को संदर्भित करना चाहते हैं, तो आप सेल C5 को संदर्भित करने के लिए दो तरीकों का उपयोग कर सकते हैं।
रेंज विधि का उपयोग: RANGE(“C5”) … रेंज के साथ हम Cell का करेक्ट एड्रेस देना होता है
सेल विधि का उपयोग करना: CELL (5, 3) .. इसमें “5” Column नंबर है और “3” Row नंबर है
इसी तरह, यदि आप C5 सेल में “Hi” वैल्यू डालना चाहते हैं, तो आप नीचे दिए गए कोड का उपयोग कर सकते हैं।
रेंज विधि का उपयोग करना: RANGE(“C5”).value = “Hi”
CELL विधि का उपयोग करना: CELL (5, 3).value = “Hi”
अब, यदि आप कई सेल का चयन करना चाहते हैं, तो हम केवल रेंज ऑब्जेक्ट के माध्यम से चयन कर सकते हैं।
उदाहरण के लिए, यदि मैं A1 से A10 तक की कोशिकाओं का चयन करना चाहता हूं, तो नीचे कोड है।
कोड: RANGE (“A1: A10”).Select
हम CELLS प्रॉपर्टी का उपयोग करके एक समय में केवल एक सेल को संदर्भित कर सकते हैं। हम ऊपर की तरह एक रेंज ऑब्जेक्ट के साथ सेल का उपयोग कर सकते हैं।
Range(“A2: C15”).Cells(5,2).value = “Hi” …. का मतलब A2 से C15 पांचवीं पंक्ति और दूसरे कॉलम यानी B5 सेल में “Hi” वैल्यू पड़ जाए ।
मान लें कि आप डेटा 1 नामक शीट में काम कर रहे हैं, और आप सेल A1 में “हैलो” वैल्यू डालना चाहते हैं।
आप नीचे दिए हुए कोड का उपयोग कर सकते हैं ।
Sub Cells_Example()
Cells(1, 1).Value = “Hello”
End Sub
परिणाम:
अब मैं डेटा 2 नामक शीट नाम पर जाऊंगा और कोड चलाऊंगा। वहां भी, यह “हैलो” शब्द डालेगा।
दरअसल, हम CELLS संपत्ति में एक विशेष शीट का नाम भी जोड़ सकते हैं। किसी विशेष शीट को संदर्भित करने के लिए, workobject का उपयोग करें।
Worksheets(“Data 1”).Cells(1,1).Value = “Hello”
यह शीट में “हैलो” शब्द सम्मिलित करेगा “डेटा 1” चाहे आप जिस भी शीट में हों।
दरअसल, हम CELLS प्रॉपर्टी का इस्तेमाल RANGE ऑब्जेक्ट के साथ कर सकते हैं। उदाहरण के लिए, नीचे दिए गए कोड को देखें।
Range(“C2:E8”).Cells(1, 1).Select
बेहतर समझ के लिए, मैंने एक्सेल शीट में कुछ नंबर दर्ज किए हैं।
Range(“C2:E8”).Cells(1, 1).Select उपरोक्त कोड में हम C2 से लेकर E8 तक सभी CELL को Select कर रहे है। इस कोड को Run करे और देखें कि क्या होता है।
Sub Cells_Example()
Range(“C2:E8”).Cells(1, 1).value = “Hello”
End Sub
इसने सेल C2 से लेकर E8 को सेलेक्ट किया है। और सेल (1, 1) “A1” में “Hello” वैल्यू डाल दी है ?
इसका कारण सेल C2 का चयन किया गया है क्योंकि रेंज ऑब्जेक्ट का उपयोग करते हुए, हमने C2 से E8 के रूप में सीमा पर जोर दिया है, इसलिए सेल प्रॉपर्टी C2 से E8 तक की रेंज को मानते हैं, नियमित A1 सेल से नहीं। इस उदाहरण में, C2 पहली पंक्ति और पहला स्तंभ है, इसलिए कक्ष (1, 1) .select का अर्थ है C2 सेल।
अब मैं कोड को Range(“C2: E8”).Cells(3, 2).Select चयन करें और देखें कि क्या होता है।
इस कोड को चलाएं और जांचें कि वास्तव में यह कौन सी सेल का चयन करेगा।
Sub Cells_Example()
Range(“C2:E8”).Cells(3, 2).Select
End Sub
इसने सेल D4 यानि नंबर 26 को चुना है। C2 सेल से शुरू होने वाले सेल (3,2) का मतलब है 3 पंक्तियों से नीचे की ओर जाना और 2 कॉलम को दाईं ओर ले जाना, यानी D4 सेल।
Loops के साथ CELLS प्रॉपर्टी का VBA में बहुत अच्छा संबंध है। आइए LOOP का उपयोग करके 1 से 10 तक सीरियल नंबर डालने के उदाहरण को देखें। नीचे दिए गए कोड को अपने मॉड्यूल में कॉपी और पेस्ट करें।
Sub Cells_Example()
Dim i As Integer
For i = 1 To 10
Cells(i, 1).Value = i
Next i
End Sub
कॉमर्स स्ट्रीम | साइंस स्ट्रीम | आर्ट्स स्ट्रीम |
उत्तराखंड के मुख्यमंत्री श्री त्रिवेंद्र सिंह रावत जी द्वारा 13 मार्च 2020 को मुख्यमंत्री आंचल…
नमस्कार दोस्तों आप सभी का हमारे ब्लॉक पर हार्दिक स्वागत है। दोस्तों आज हम आपको…
उत्तराखंड फ्री लैपटॉप योजना को राज्य सरकार द्वारा मेधावी छात्र छात्राओं को निशुल्क लैपटॉप उपलब्ध…
उत्तराखंड राज्य सरकार द्वारा राज्य की बेटियों के लिए, बेटी बचाओ बेटी पढ़ाओ अभियान के…
यह परीक्षा ग्रेजुएट मैनेजमेंट प्रवेश परिषद (GMAC) द्वारा आयोजित की जाती है। यह एक कंप्यूटर…
गुजरात किसान दुर्घटना बीमा योजना के अंतर्गत यदि किसी किसान की खेत में काम करते…