एक्सेलमा चयन गर्न दायरा चर सेट गर्न VBA कसरी प्रयोग गर्ने (5 विधिहरू)

  • यो साझा गर्नुहोस्
Hugh West

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

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

VBA चयन गर्न दायरा सेट गर्नुहोस्।>१। एक्सेल VBA द्वारा दायरा चयन गर्न दायरा चर सेट गर्दै

हामी VBA मा सेटिङ दायरा द्वारा दायरा चयन गर्न सक्छौं। मानौं हामी सेलहरू चयन गर्न चाहन्छौं B5:C8 । तलको प्रक्रियामा जाऔं।

चरणहरू:

  • कोड लेख्न VBA, पहिले, विकासकर्ता खोल्नुहोस् ट्याब र त्यसपछि भिजुअल बेसिक चयन गर्नुहोस्।

15>

त्यसपछि, यसले का लागि माइक्रोसफ्ट भिजुअल बेसिकको नयाँ विन्डो खोल्नेछ। अनुप्रयोगहरू

  • अब, खोल्नुहोस् Insert >> मोड्युल

चयन गर्नुहोस्।

  • VBA मोड्युल मा निम्न कोड टाइप गर्नुहोस्।
3022

यहाँ, हामीले रेन्ज B5:C8 Rng1 को रूपमा सेट गर्छौं। हामीले यसलाई VBA को दायरा विधि द्वारा चयन गर्छौं। यो ध्यानमा राख्नुहोस् कि हामीले सक्रिय हाम्रो एक्सेल पाना त्यसैले हामीले सेलेक्ट रेन्ज पाना सक्रिय गर्यौं।

  • अब फिर्ता जानुहोस्। पाना र चलाउनुहोस् म्याक्रो

  • त्यसपछि, तपाईंले दायरा B5:C8 स्वतः चयन भएको देख्नुहुनेछ।

यसैले तपाईंले चाहेको रेन्ज चर VBA प्रयोग गरेर चयन गर्न सेट गर्न सक्नुहुन्छ।

थप पढ्नुहोस्: Excel VBA: मानसहित कक्षहरूको दायरा प्राप्त गर्नुहोस् (७ उदाहरणहरू)

2। दायरा चर सेट गरेर कक्षहरू ढाँचा गर्न VBA प्रयोग गर्दै

मानौं हाम्रो डेटासेट निम्न छवि जस्तो देखिन्छ।

हामी बनाउन चाहन्छौं। हेडिङ बोल्ड र AutoFit स्तम्भहरू । हामी यो VBA मार्फत गर्न सक्छौं। हामी यो कसरी गर्न सक्छौं हेरौं।

चरणहरू:

  • पहिले, भिजुअल बेसिक खोल्नुहोस् र निम्न कोड टाइप गर्नुहोस् VBA मोड्युल (कसरी खोल्ने हेर्नको लागि भिजुअल बेसिक VBA मोड्युल , कृपया खण्ड 1 मा जानुहोस्।
2046

यहाँ हामीले रेन्ज B4:C4 xyz लाई सेट गर्छौं। त्यसपछि हामीले सेल B4 C4 बोल्ड मा फन्टहरू बनाउन बोल्ड विधि प्रयोग गर्यौं। हामीले AutoFit विधि प्रयोग गरेर स्तम्भ B C पनि फिट गरेका छौं।

  • अब, पानामा फर्कनुहोस्। र चलाउनुहोस् Macro जसलाई SetRange नाम दिइएको छ।

त्यसपछि, तपाईंले देख्नुहुनेछ नामहरू स्पष्ट रूपमा स्तम्भहरू हेडरहरू बन्नुहोस् बोल्ड र चयन गर्नुहोस्।

23>

यस मार्ग अनुसरण गरेर , तपाईंले ढाँचा कक्षहरू र AutoFit स्तम्भ सेटिङ दायरा चर मा VBA

समान पढाइहरू

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

3। VBA मा चर दायरा चयन सेट गरेर दायरा प्रतिलिपि गर्दै

मानौं हामी B6:C9 रेन्ज चर सेट गरेर चयन गर्न चाहन्छौं। २>। तलको प्रक्रियाबारे छलफल गरौं।

चरणहरू:

  • पहिले भिजुअल बेसिक खोल्नुहोस् र मा निम्न कोड टाइप गर्नुहोस्। VBA मोड्युल (कसरी भिजुअल बेसिक VBA मोड्युल खोल्ने, कृपया खण्ड 1 मा जानुहोस्।
7731

यहाँ, हामीले VBA को प्रतिलिपि विधि प्रयोग गरेर केवल रेन्ज B6:C9 प्रतिलिपि गरेका छौं। हामीले रेन्ज B6:C9 cpy को रूपमा सेट गर्यौं।

  • अब आफ्नो पाना मा फर्कनुहोस् र म्याक्रो<चलाउनुहोस्। २>। प्रतिलिपि दायरा चयन गर्नुहोस् किनकि यो तपाईंको हालको म्याक्रो को नाम हो।

तपाईंले दायरा देख्नुहुनेछ। B6:C9 प्रतिलिपि गरिएको छ।

तपाईँले <1 थिचेर यो रेन्ज तपाईँको एक्सेल पाना जहाँ पनि टाँस्न सक्नुहुन्छ।>CTRL + V । मैले दायरा B12 मा C15 मार्फत टाँसें।

यो विधिको साथमा गएर, तपाईंले एक्सेल VBA चयन गर्न दायरा चर सेट गरेर प्रतिलिपि a दायरा सेट गरेर।

थप पढ्नुहोस्। : Excel VBA: Dynamic प्रतिलिपि गर्नुहोस्अर्को कार्यपुस्तिकामा दायरा

4। चयनमा दायरा चर सेट गरेर कक्षहरू ढाँचा गर्नुहोस्

मानौं हामी डेटासेटको 8 औं 10 औं पङ्क्तिहरू हरियो<संग रङ गर्न चाहन्छौं। २>। तलको विवरण पछ्याउनुहोस्।

चरणहरू:

  • पहिले भिजुअल बेसिक खोल्नुहोस् र मा निम्न कोड टाइप गर्नुहोस्। VBA मोड्युल (कसरी भिजुअल बेसिक VBA मोड्युल खोल्ने, कृपया खण्ड 1 मा जानुहोस्।
3716

यहाँ हामीले हाम्रो दायरा B8:C8 B10:C10 x1 x2 <2 लाई परिभाषित गर्छौं।> क्रमशः। हामीले हाम्रो रङ Excel पाना को रूपमा ActiveSheet बनायौं र हामीले हाम्रो मनपर्ने रेन्जहरू ColorIndex गुण द्वारा रंग्यौं।

  • अब आफ्नो पाना मा फर्कनुहोस् र म्याक्रो चलाउनुहोस्। रङ दायरा चयन गर्नुहोस् किनकि यो हालको म्याक्रो को नाम हो।

त्यसपछि, तपाईंले इच्छित देख्नुहुनेछ। रेन्जहरू हरियो रङले भरिएको।

यसैले तपाईँले सेलहरूलाई रङ सेट गरेर ढाँचा गर्न सक्नुहुन्छ। रेन्ज चर चयन गर्न।

थप पढ्नुहोस्: एक्सेल VBA का साथ चल पङ्क्ति र स्तम्भको साथ दायरा कसरी प्रयोग गर्ने

समान पढाइहरू

  • VBA to लूप मार्फत पङ्क्ति र स्तम्भहरू Excel मा दायरामा (5 उदाहरणहरू)
  • Excel VBA खाली सेल सम्म दायरा मार्फत लुप गर्न (4 उदाहरणहरू)
  • कसरी एक्सेल VBA मा दायरालाई एरेमा रूपान्तरण गर्ने (३ तरिका)

५।VBA मा दायरा चर सेट गरेर पङ्क्तिहरू मेटाउँदै

मानौं हामी हरियो डेटासेटको 8 औं 10 औं पङ्क्तिहरू मेटाउन चाहन्छौं। । तलको विवरण पछ्याउनुहोस्।

चरणहरू:

  • पहिले भिजुअल बेसिक खोल्नुहोस् र मा निम्न कोड टाइप गर्नुहोस्। VBA मोड्युल (कसरी भिजुअल बेसिक VBA मोड्युल खोल्ने, कृपया खण्ड 1 मा जानुहोस्।
4908

रेन्जहरू जुन हामीले मेटाउन चाहन्छौँ B8:C8 B10:C10 । हामीले तिनीहरूलाई क्रमशः x1 x2 नाम दियौं। त्यसपछि हामीले तिनीहरूलाई मेटाउनुहोस् विधिद्वारा मेट्यौँ।

  • अब आफ्नो पाना मा फर्कनुहोस् र म्याक्रो चलाउनुहोस्। DeleteRange छनोट गर्नुहोस् किनकि यो तपाईंको हालको Macro को नाम हो।

त्यसपछि, तपाईंले दायराहरू B8:C8 B10:C10 गिसकेको छ।

यस दृष्टिकोण पछ्याएर, तपाईंले पङ्क्तिहरू <मेटाउन सक्नुहुन्छ। 2> चयन गर्न रेन्ज चर सेट गरेर।

अभ्यास खण्ड

निम्न छविमा, तपाईंले यस लेखमा हामीले काम गरेको डेटासेट पाउनुहुनेछ ताकि तपाईं आफै अभ्यास गर्न सक्नुहुन्छ।

निष्कर्ष

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

Hugh West एक उच्च अनुभवी एक्सेल प्रशिक्षक र उद्योग मा 10 वर्ष भन्दा बढी अनुभव संग विश्लेषक हो। उनले लेखा र वित्तमा स्नातक र व्यवसाय प्रशासनमा स्नातकोत्तर डिग्री हासिल गरेका छन्। Hugh को शिक्षण को लागी एक जोश छ र एक अद्वितीय शिक्षण दृष्टिकोण को विकास गरेको छ जुन पछ्याउन र बुझ्न सजिलो छ। एक्सेलको उनको विशेषज्ञ ज्ञानले विश्वभरका हजारौं विद्यार्थी र पेशेवरहरूलाई उनीहरूको सीप सुधार गर्न र उनीहरूको करियरमा उत्कृष्टता हासिल गर्न मद्दत गरेको छ। आफ्नो ब्लग मार्फत, हगले व्यक्ति र व्यवसायहरूलाई उनीहरूको पूर्ण क्षमतामा पुग्न मद्दत गर्न नि:शुल्क एक्सेल ट्यूटोरियलहरू र अनलाइन प्रशिक्षणहरू प्रदान गर्दै आफ्नो ज्ञान संसारसँग साझा गर्छन्।