VBA टु लुप थ्रु पङ्क्तिहरू एक्सेलमा दायरा (६ उदाहरणहरू)

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

यस ट्युटोरियलमा, हामी एक्सेलमा दायरा भित्र पङ्क्तिहरू मार्फत लुप गर्न VBA कसरी प्रयोग गर्ने भनेर कभर गर्नेछौं। हामी एउटै कुरा बारम्बार गर्न रोक्नको लागि लूपहरू प्रयोग गर्छौं। Microsoft Excel मा काम गर्दा, हामीले आफूलाई एकै स्थानमा भेट्टाउन सक्छौं जहाँ हामीले एउटै कार्य धेरै पटक गर्नुपर्दछ। हामी यसलाई सजिलैसँग VBA मा लूपहरू प्रयोग गरेर गर्न सक्छौं। यस लेखमा, हामी VBA को साथ एक्सेलमा पङ्क्तिहरू मार्फत लुप गर्नका लागि 6 उदाहरणहरू प्रदर्शन गर्नेछौं। हामीले उदाहरणहरूमा प्रयोग गर्ने लूप ' For-Next Loop ' हो।

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

हामी यहाँबाट अभ्यास कार्यपुस्तिका डाउनलोड गर्न सक्छौँ।<3 Range.xlsm मा पङ्क्तिहरू मार्फत VBA लुप

6 एक्सेलमा VBA सँग दायरामा पङ्क्तिहरू मार्फत लुप गर्ने उदाहरणहरू

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

१. पङ्क्तिहरू मार्फत लुप गर्न दायरा भेरिएबलसँग VBA प्रयोग गर्नुहोस्

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

यो उदाहरण प्रदर्शन गर्ने चरणहरू हेरौं।

चरणहरू:

  • सुरु गर्न, सक्रिय कार्यपत्र ' रेन्ज चर ' मा जानुहोस्।
  • अतिरिक्त, दायाँ क्लिक गर्नुहोस् र ' कोड हेर्नुहोस् ' विकल्प चयन गर्नुहोस्। तपाईं पनि थिच्न सक्नुहुन्छ Alt + F11 यो खोल्नको लागि।

  • माथिको कार्यले त्यो कार्यपत्रको लागि कोड विन्डो खोल्छ।
  • थप, कोड विन्डोमा कोड टाइप गर्नुहोस्:
4784
  • त्यसपछि, रन मा क्लिक गर्नुहोस् वा F5 <2 थिच्नुहोस्।>कोड चलाउनको लागि।

  • अन्तमा, हामीले निम्न स्क्रिनसट जस्तै परिणामहरू प्राप्त गर्नेछौं।

थप पढ्नुहोस्: एक्सेल VBA: दायरामा स्तम्भहरू मार्फत लुप गर्नुहोस् (५ उदाहरणहरू)

2. VBA लागू गर्नुहोस् लूप थ्रु रोहरू संख्यात्मक चरको साथ दायरामा

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

लाई हेरौं यो विधि गर्नका लागि चरणहरू।

चरणहरू:

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

  • यो कार्यले त्यो कार्यपत्रको लागि कोड विन्डो खोल्नेछ। त्यो कोड विन्डो खोल्नको लागि तपाईले Alt + F11 पनि थिच्न सक्नुहुन्छ।
  • त्यो विन्डोमा निम्न कोड टाइप गर्नुहोस्:
2191
  • त्यसपछि, रन मा क्लिक गर्नुहोस् वा कोड चलाउन F5 कुञ्जी थिच्नुहोस्।

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

पढ्नुहोस्थप: एक्सेलको दायरामा पङ्क्तिहरू र स्तम्भहरू मार्फत लुप गर्न VBA (5 उदाहरणहरू)

3. एक्सेल VBA प्रयोगकर्ता-चयनित दायरामा पङ्क्तिहरू मार्फत लुप गर्न दायरामा

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

यस उदाहरणसँग सम्बन्धित चरणहरू हेरौं।

चरणहरू:

  • सुरुमा, सेल दायरा चयन गर्नुहोस् ( D5:D9 )।

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

  • माथिको आदेशले VBA कोड विन्डो खोल्नेछ। सक्रिय कार्यपत्रको लागि। तपाईंले Alt + F11 थिचेर त्यो कोड विन्डो पनि खोल्न सक्नुहुन्छ। त्यो खाली कोड विन्डोमा निम्न कोड घुसाउनुहोस्:
1987
  • त्यसपछि, त्यो कार्यपत्रको लागि कोड चलाउन रन मा क्लिक गर्नुहोस् वा F5 <थिच्नुहोस्। 2>कुञ्जी।

  • त्यसोभए, चयन गरिएको दायराको पहिलो मान देखाउने सन्देश बाकस देखिन्छ।

  • यसबाहेक, यदि तपाईंले ठीक मा क्लिक गर्नुभयो भने यसले चयन गरिएको दायराको दोस्रो मान फर्काउनेछ जुन सेल D6 हो।

  • यो प्रक्रिया सेल D9 चयन गरिएको दायराको अन्तिम मान सम्म जारी रहनेछ।

<29

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

समान पढाइहरू

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

४. VBA

चौथो उदाहरणमा, हामी VBA लाई डायनामिक दायरामा पङ्क्तिहरू मार्फत लुप गर्न लागू गर्नेछौं। । यो उदाहरण अघिल्लो भन्दा अलि फरक छ। हामी एक्सेल कार्यपत्रको लागि लुपमा दायरा अनुकूलन गर्न सक्षम हुनेछौं। यस विधिलाई चित्रण गर्न हामी निम्न डेटासेट प्रयोग गर्नेछौं। निम्न डेटासेटमा, हामी दायराको मानहरू ( B8:C12 ) एक निश्चित मानसँग भर्नेछौं।

केवल तलका चरणहरू मार्फत जानुहोस्। यो विधि प्रदर्शन गर्न।

चरण:

  • पहिले, इनपुट मान 6 कक्षमा B1 C कक्षमा B2
  • दोस्रो, सक्रिय कक्षमा दायाँ क्लिक गर्नुहोस् र ' कोड हेर्नुहोस् विकल्प चयन गर्नुहोस्। '।

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

<12
  • नतिजाको रूपमा, डेटासेट मान भरिन्छ $2500.00 निम्न तरिकामा।
  • नोट:

    माथिको छविमा, मान 6 दायराको पहिलो दुई पङ्क्तिहरू प्रतिनिधित्व गर्दछ ( B8:B9 )।

    • अन्तमा, मान इनपुट गर्नुहोस् 9 मा। सेल B1 को सट्टा 6 । हामी निम्न छविमा नतिजाहरू देख्न सक्छौं।

    5. VBA घुसाउनुहोस् लूप थ्रु एन्टियर रो इन दायरा

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

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

    चरण:

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

    • माथिको आदेशले खाली VBA कोड विन्डो खोल्छ। सक्रिय कार्यपत्रको लागि। हामीले Alt + F11 थिचेर पनि यो कोड विन्डो प्राप्त गर्न सक्छौं।
    • अर्को, त्यो कोड विन्डोमा निम्न कोड घुसाउनुहोस्:
    5226
    • त्यसपछि, रन मा क्लिक गर्नुहोस् वा कोड चलाउन F5 कुञ्जी थिच्नुहोस्।

    <12
  • माथिको छविमा, हाइलाइट गरिएको मान ' क्रिस ' ले हामीले खोज्ने मानलाई संकेत गर्छ। दायरा मान ' 5:9 ' ले संकेत गर्दछ कि हामी सेल दायरामा मान खोज्नेछौं ( B5:B9 )।
  • अन्तमा, सन्देश बाकसले मान देखाउँछ।' क्रिस ' सेल B6 मा अवस्थित छ।
  • थप पढ्नुहोस्: VBA कसरी प्रयोग गर्ने एक्सेलको दायरामा प्रत्येक पङ्क्ति

    6. एक्सेल VBA

    अन्तिम उदाहरणमा, हामीले VBA <2 लागू गर्नेछौं।> दायरामा प्रत्येक n-th पङ्क्ति मार्फत लुप गर्न। निम्न डेटासेटमा, हामी हाम्रो डेटा दायराको बिजोर संख्या पङ्क्तिहरूमा रंग छायांकन लागू गर्नेछौं।

    त्यसोभए, यो विधि प्रदर्शन गर्ने चरणहरू हेरौं।

    चरण:

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

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

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

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

    निष्कर्ष

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

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