यस ट्यूटोरियलले एक्सेलको स्तम्भमा प्रयोग गरिएको दायरा चयन गर्न VBA प्रयोग गर्ने उदाहरणहरू देखाउनेछ। सामान्यतया, एक्सेलमा रहेको UsedRange गुणले कार्यपत्रको अंशलाई प्रतिनिधित्व गर्दछ जुन यसमा डाटा छ। उदाहरणहरू स्पष्ट रूपमा चित्रण गर्न, हामी सबै उदाहरणहरूको लागि विशेष डेटासेटमा प्रयोग गरिएको दायरा गुण लागू गर्नेछौं।

अभ्यास कार्यपुस्तिका डाउनलोड गर्नुहोस्

हामी यहाँबाट अभ्यास कार्यपुस्तिका डाउनलोड गर्न सक्छौं। .

८ स्तम्भमा UsedRange चयन गर्न VBA को सजिलो उदाहरणहरू

निम्न छविमा , हामी डेटासेट देख्न सक्छौं जुन हामीले सबै उदाहरणहरूको लागि प्रयोग गर्नेछौं। डेटासेटमा बिक्रेताहरू , तिनीहरूको स्थान , क्षेत्र, र बिक्रीको ‘ कुल रकम ’ को नामहरू समावेश छन्। यस डेटासेटमा, शीर्षक सहित प्रयोग गरिएको दायरालाई विचार गरिनेछ। त्यसकारण, निम्न डेटासेटमा प्रयोग गरिएको दायरा ( B2:E15 ) हो।

१. एक्सेलमा VBA सँग स्तम्भमा UsedRange चयन गर्नुहोस्

सबैभन्दा पहिले, हामी हाम्रो डेटासेटबाट सबै स्तम्भहरू चयन गर्नेछौं। यो गर्नका लागि हामी स्तम्भहरूमा VBA चयन UsedRange गुण प्रयोग गर्नेछौं। यो विधि प्रदर्शन गर्ने चरणहरू हेरौं।

चरणहरू:

• सुरु गर्नको लागि, नामको सक्रिय पानामा दायाँ क्लिक गर्नुहोस् ' स्तम्भ चयन गर्नुहोस् '।
• अतिरिक्त, ' कोड हेर्नुहोस् ' विकल्प चयन गर्नुहोस्।

7340

• त्यसपछि, रन मा क्लिक गर्नुहोस् वा कोड चलाउन F5 कुञ्जी थिच्नुहोस्।

• अन्तमा, हामी निम्न छवि जस्तै परिणाम प्राप्त गर्छौं। हामी हाम्रो डेटासेटबाट स्तम्भहरूमा प्रयोग गरिएको दायरा अब चयन गरिएको देख्न सक्छौं।

२. स्तम्भ

मा सम्पूर्ण UsedRange प्रतिलिपि गर्न VBA प्रयोग गर्नुहोस्। दोस्रो उदाहरणमा, हामी हाम्रो डेटासेटबाट स्तम्भहरूमा प्रयोग गरिएको सम्पूर्ण दायरा प्रतिलिपि गर्न VBA प्रयोग गर्नेछौं। सामान्यतया, हामी हाम्रो डेटासेटबाट एक विशेष क्षेत्र प्रतिलिपि गर्न यो विधि प्रयोग गर्छौं। यो विधि प्रदर्शन गर्न हामीले तलका चरणहरू पालना गर्न आवश्यक छ।

चरणहरू:

• पहिले, ' प्रतिलिपि<नामक सक्रिय कार्यपत्र ट्याबमा जानुहोस्। 2>'।
• अर्को, त्यो ट्याबमा दायाँ क्लिक गर्नुहोस् र ' कोड हेर्नुहोस् ' विकल्प चयन गर्नुहोस्।

• यसले हालको कार्यपत्रको लागि खाली VBA कोड विन्डो खोल्नेछ। यो विन्डो प्राप्त गर्ने अर्को तरिका किबोर्डबाट Alt + F11 थिच्नु हो।
• त्यसपछि, त्यो कोड विन्डोमा तलको कोड घुसाउनुहोस्:

4137

• अब, कोड चलाउन रन मा क्लिक गर्नुहोस् वा F5 कुञ्जी थिच्नुहोस्।

• अन्तमा, हामी निम्न जस्तै परिणाम देख्न सक्छौं। साथै, हामी प्रयोग दायरा वरिपरि सीमा रेखा देख्न सक्छौं। यसले संकेत गर्दछ कि कोडले डाटा प्रतिलिपि गरेको छयो सीमा भित्र।

थप पढ्नुहोस्: एक्सेल VBA: डायनामिक दायरालाई अर्को कार्यपुस्तिकामा प्रतिलिपि गर्नुहोस्

3. गणना नम्बर VBA प्रयोग गरी UsedRange मा स्तम्भहरूको संख्या

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

चरणहरू:

• पहिले, ' Count_Columns ' नामको सक्रिय पाना चयन गर्नुहोस्।
• दोस्रो, सक्रिय पानाको नाममा दायाँ क्लिक गर्नुहोस् र ' कोड हेर्नुहोस् ' विकल्पमा क्लिक गर्नुहोस्।

• माथिको आदेशले सक्रिय कार्यपत्रको लागि खाली VBA कोड विन्डो खोल्छ। हामीले किबोर्डबाट Alt + F11 थिचेर पनि कोड विन्डो प्राप्त गर्न सक्छौं।
• तेस्रो, त्यो खाली कोड विन्डोमा निम्न कोड इनपुट गर्नुहोस्:

7300

• अर्को, रन मा क्लिक गर्नुहोस् वा कोड चलाउन F5 कुञ्जी थिच्नुहोस्।

• अन्तमा, हामीले सन्देश बक्समा परिणाम प्राप्त गर्छौं। प्रयोग गरिएको दायरामा स्तम्भहरूको संख्या 4 हो।

थप पढ्नुहोस्: दायरामा पङ्क्तिहरू गणना गर्न VBA कसरी प्रयोग गर्ने एक्सेलमा डाटाको साथ (५ म्याक्रो)

4. एक्सेल VBA प्रयोग गरिएको दायरामा अन्तिम स्तम्भको संख्या गणना गर्न

अघिल्लो विधिमा, हामीले अन्तिम स्तम्भको संख्या निकाल्यौं। प्रयोग गरिएको दायरा।यद्यपि, यस उदाहरणमा, हामीले VBA चयन UsedRange गुण प्रयोग गरेर सम्पूर्ण कार्यपत्रमा प्रयोग गरिएको दायरामा अन्तिम स्तम्भको संख्या निर्धारण गर्नेछौं। यो कार्य गर्न हामीले पालना गर्नुपर्ने चरणहरू हेरौं।

चरण:

• सुरु गर्न, दायाँ क्लिक गर्नुहोस् ' अन्तिम स्तम्भ ' नामको सक्रिय पानामा।
• अर्को, ' कोड हेर्नुहोस् ' विकल्प चयन गर्नुहोस्।

• त्यसोभए, माथिको आदेशले त्यो कार्यपत्रको लागि खाली VBA कोड विन्डो खोल्छ। त्यो कोड विन्डो खोल्ने वैकल्पिक तरिका Alt + F11 थिच्नु हो।
• त्यसपछि, कोड विन्डोमा निम्न कोड घुसाउनुहोस्:

7905

• अब, रन मा क्लिक गर्नुहोस् वा कोड चलाउन F5 कुञ्जी थिच्नुहोस्।

• अन्तमा, हामीले हाम्रो नतिजा सन्देश बक्समा पाउँछौं। प्रयोग गरिएको दायरामा अन्तिम स्तम्भ 5 औं कार्यपत्रको स्तम्भ हो।

समान पठनहरू

• एक्सेलमा दायरामा प्रत्येक पङ्क्तिको लागि VBA कसरी प्रयोग गर्ने
• VBA प्रयोग गर्नुहोस् एक्सेलमा सक्रिय सेलबाट दायरा चयन गर्न (3 विधिहरू)
• Excel म्याक्रो: डायनामिक दायरा (4 विधिहरू) संग बहु स्तम्भहरू क्रमबद्ध गर्नुहोस्

5. VBA

चरण:

• पहिले, ' Last_Cell<2 नामको सक्रिय पाना चयन गर्नुहोस्।>'।
• अर्को, त्यो पानाको नाममा दायाँ क्लिक गर्नुहोस् । ' कोड हेर्नुहोस् ' विकल्प चयन गर्नुहोस्।

• त्यसपछि, हामीले एउटा खाली VBA कोड विन्डो पाउँछौँ। । साथै, हामी त्यो कोड विन्डो खोल्न Alt + F11 थिच्न सक्छौं।
• त्यसपछि, त्यो कोड विन्डोमा निम्न कोड टाइप गर्नुहोस्:

9473

• अब, कोड चलाउन रन मा क्लिक गर्नुहोस् वा F5 थिच्नुहोस्।

• अन्तमा, हामी निम्न छविमा परिणाम देख्न सक्छौं। अन्तिम स्तम्भको चयन गरिएको अन्तिम सेल सेल हो E15 ।

6. Excel VBA

यस उदाहरणमा, हामी एक्सेल कार्यपत्रमा चयन गरिएको प्रयोग दायराको सेल दायरा फेला पार्न VBA लागू गर्नेछौं। हामीले हाम्रो प्रयोग दायरामा रहेका सबै स्तम्भहरूको लागि VBA कोड प्रयोग गर्नेछौं। कोडले सेल दायरा र प्रयोग गरिएको दायरामा स्तम्भको ठेगाना फिर्ता गर्नेछ। यो कार्य गर्नको लागि तलका चरणहरू पालना गर्नुहोस्।

चरणहरू:

• सुरुमा, सक्रिय पाना ट्याबमा दायाँ क्लिक गर्नुहोस् नाम दिइएको ' सेल दायरा खोज्नुहोस् '।
• दोस्रो, ' कोड हेर्नुहोस् ' विकल्प चयन गर्नुहोस्।

• यसले खाली VBA कोड विन्डो खोल्नेछ। यो कोड सञ्झ्याल खोल्ने अर्को तरिका Alt थिच्नु हो + F11 ।
• तेस्रो, त्यो कोड विन्डोमा निम्न कोड प्रविष्ट गर्नुहोस्:

9927

• त्यसपछि, कोड चलाउनको लागि मा क्लिक गर्नुहोस्। रन वा F5 कुञ्जी थिच्नुहोस्।

• अन्तमा, सन्देश बक्स जस्तै निम्न छविले परिणाम देखाउँछ।

समान पठनहरू

• VBA टु लूप थ्रु रो र एक्सेलमा दायराका स्तम्भहरू (५ उदाहरणहरू)
• कसरी एक्सेल VBA मा दायरालाई एरेमा रूपान्तरण गर्ने (३ तरिकाहरू)

7. घुसाउनुहोस् VBA खाली कक्षहरू गणना गर्न प्रयोग गरिएको दायरा गुण

यस उदाहरणमा, हामी एक्सेल पानामा खाली कक्षहरू गणना गर्न VBA चयन प्रयोग गरिएको दायरा गुण प्रयोग गर्नेछौं। कहिलेकाहीँ हामीसँग हाम्रो डेटासेटको प्रयोग दायरामा खाली कक्षहरू हुन सक्छ। हामीले UsedRange गुण प्रयोग गरेर ती खाली कक्षहरूको संख्या सजिलै गणना गर्न सक्छौं। यो उदाहरण प्रदर्शन गर्ने चरणहरू हेरौं।

चरणहरू:

• पहिले, दायाँ क्लिक गर्नुहोस् नामको सक्रिय पाना ट्याबमा। Empty_cells '.
• अर्को, ' कोड हेर्नुहोस् ' विकल्प चयन गर्नुहोस्।

• माथिको कार्यले खाली VBA कोड विन्डो खोल्छ। त्यो कोड विन्डो खोल्ने वैकल्पिक तरिका Alt + F11 थिच्नु हो।
• त्यसपछि, त्यो कोड विन्डोमा निम्न कोड घुसाउनुहोस्:

7268

• त्यसपछि, रन मा क्लिक गर्नुहोस् वा कोड चलाउन F5 कुञ्जी थिच्नुहोस्।

• अन्तमा, हामीले सन्देश बक्समा परिणाम प्राप्त गर्नेछौं। दसन्देश बाकसले हाम्रो प्रयोग गरिएको दायरामा कुल कक्षहरू र खाली कक्षहरूको सङ्ख्या देखाउनेछ।

8. VBA प्रयोग गरिएको दायरा एक्सेल <10 मा स्तम्भमा पहिलो खाली कक्ष पत्ता लगाउन>

अन्तिम उदाहरणमा, हामीले हाम्रो एक्सेल कार्यपत्रमा पहिलो खाली सेल पत्ता लगाउन स्तम्भमा रहेको प्रयोग गरिएको दायरा गुण चयन गर्न एक्सेल VBA प्रयोग गर्नेछौं। यो विधिले विशेष स्तम्भको पहिलो खाली कक्ष पत्ता लगाउनेछ। खाली सेल सधैं डाटासेट को प्रयोग दायरा बाहिर हुनेछ। त्यसोभए, यदि प्रयोग गरिएको दायरामा कुनै सेल खाली वा खाली छ भने यो विधिमा विचार गरिने छैन। अब, यो विधि गर्नको लागि तलका चरणहरू पालना गर्नुहोस्।

चरणहरू:

• सुरु गर्न, सक्रियमा दायाँ क्लिक गर्नुहोस् ' First_Empty ' नामको पाना ट्याब।
• अतिरिक्त, ' कोड हेर्नुहोस् ' विकल्प चयन गर्नुहोस्।

<3

• यसले खाली VBA कोड विन्डो खोल्नेछ। हामी त्यो कोड विन्डो खोल्न Alt + F11 थिच्न पनि सक्छौं।
• यसबाहेक, खाली VBA कोड विन्डोमा निम्न कोड टाइप गर्नुहोस्:

7776

• त्यसपछि, कोड चलाउन रन मा क्लिक गर्नुहोस् वा F5 कुञ्जी थिच्नुहोस्।

• अन्तमा, माथिको कोडले सेल E16 मा ' FirstEmptyCell ' मान घुसाउनेछ। यो डेटासेटको प्रयोग गरिएको दायरा पछि स्तम्भ E को पहिलो खाली कक्ष हो।

थप पढ्नुहोस्: Excel VBA लाई खाली कक्ष (४ उदाहरणहरू)

सम्म दायरा मार्फत लुप गर्नुहोस्निष्कर्ष

संक्षेपमा, यो ट्युटोरियलले एक्सेल पानामा VBA चयन प्रयोग गरिएको दायरा प्रपर्टी प्रयोग गर्नका लागि 8 उदाहरणहरू देखाउँछ। आफ्नो सीपहरू परीक्षणमा सेट गर्न, यस लेखको लागि प्रयोग गरिएको अभ्यास कार्यपत्र डाउनलोड गर्नुहोस्। यदि तपाईंसँग कुनै प्रश्नहरू छन् भने कृपया तलको बक्समा टिप्पणी गर्न नहिचकिचाउनुहोस्। हाम्रो टोलीले सकेसम्म चाँडो तपाईंको सन्देशमा प्रतिक्रिया दिने प्रयास गर्नेछ। भविष्यमा थप नवीन Microsoft Excel समाधानहरूका लागि सतर्क रहनुहोस्।